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1. INTRODUCTION 



MONARCH is a batch-oriented operating system that 
allows batched assemblies, compilations, and executions. 
The MONARCH system is available to users of XDS9300 
Computers and of XDS 900 Series Computers, and offers 
three distinct advantages: 

1. Reduced operator intervention that increases oper- 
ational reliability. 

2. All control messages recorded at the typewriter for 
visual verification and permanent logging. 

3. Batch processing capability that reduces throughput 
time. 



MONARCH allows batch processing to proceed without 
the operator having to set up processing parameters or 
select input/output devices. Use of appropriate control 
cards preceding the program permits intermixing and 
uninterrupted processing of assemblies, compilations, 
and executions. Printouts of control and error messages 
are made available during processing, and the oper- 
ator is concerned only with setting up of tapes, load- 
ing of cards, etc. If a program fails, the operator 
inspects the hard copy of control information and 
makes necessary adjustments in input/output assign- 
ments, tape designations, etc. 

A certain portion of MONARCH — called the Resident — 
remains in main memory at all times. The resident in- 
cludes the MONARCH Bootstrap (to load the MONARCH 
operating system), the Unit Assignment Table (UAT), 
error and job switches, memory dump routines, and 
for RAD MONARCH, the RAD file Management Pack- 
age. The MONARCH operating system does not re- 
main in core during the execution of programs; only 
the resident portion is there. MONARCH is reloaded 
as needed between jobs. 



bootstrap loads a short program (Bootstrap Loader) which 
in turn loads the MONARCH loader. The MONARCH 
loader can bring any of the following routines into core 
from the system tape: 

1 . The META- SYMBOL Assembler (900 Series only). 

2. The SYMBOL Assembler. 

3. The META- SYMBOL Loader (loads binary object pro- 
grams produced by META-SYMBOL and SYMBOL). 

4. The FORTRAN II Compiler (900 Series only). 

5. The FORTRAN Loader (loads object program pro- 
duced by the FORTRAN compiler, necessary sub- 
routines from the FORTRAN Library, and the 
FORTRAN Run-Time package (900 Series only). 

6. The ALGOL Compiler. 

7. The ALGOL Loader (loads object programs produced 
by ALGOL). 

8. The Update Routine (allows modifications and up- 
dating of the MONARCH system tape). 

9. The SYSGEN Routine (copies a RAD MONARCH 
system tape onto the RAD). 

The library and utility routines, provided with the system 
or added by the user to the system tape, are also brought 
into core by the loader. 

In the remainder of this document, the phrase "system 
tape" refers to the medium on which the MONARCH 
system is stored: a magnetic tape for TAPE MONARCH, 
or a RAD File for RAD MONARCH. 



The major portion of the MONARCH operating system is 
the Monitor (see Section 3). The monitor accepts con- 
trol information from many input media, assigns periph- 
eral equipment as requested, and loads and executes 
specified standard system routines. The control mes- 
sages must precede the program to be processed. In this 
manner, batch processing proceeds free from operator 
intervention and may involve the consecutive processing 
of programs from different media. 

During all operations, a portion of MONARCH resident 
in main memory retains a record of input/output assign- 
ments and contains the bootstrap. When called, the 



OPERATING ENVIRONMENTS 

The operating environment in which this system is to func- 
tion is given below. The appropriate interrupt and data 
transmission facilities are assumed. 

MONARCH 

The MONARCH system requires for its use the following 
minimum configuration of computer equipment: 

1 . An XDS 9300 Computer or an XDS 900 Series Com- 
puter system with at least 8192 words of core memory. 



2. A console typewriter to be used by the system to 
communicate with the console operator. 

3. Two or more on-line magnetic tape units. The sys- 
tem tape is on a magnetic tape unit. 

4. For RAD MONARCH, one RAD File. 

5. One or more of the following: 

card reader/punch 
paper tape reader/punch 
line printer 

META- SYMBOL/SYMBOL 

META- SYMBOL requires 12,288 words of core memory; 
its requirements for input/output devices are the same 
as those for MONARCH. SYMBOL operates on the 
minimum configuration required by MONARCH. 

If both the encoded and symbolic input are on the same 
device, an additional magnetic tape or MAGPAK is re- 
quired by META-SYMBOL. The same requirement is 
true if either the symbolic or encoded input is to be read 
from magnetic tape. 

FORTRAN II 

FORTRAN II operates on the minimum configuration re- 
quired by MONARCH. 

ALGOL 

In addition to the minimum MONARCH configuration, 
ALGOL requires one output device; that is, ALGOL 
must have a device for binary output and one for output 
listing (a line printer). 

FUNCTIONS OF MONARCH 

The operating system is a basic program execution pack- 
age which provides the following functions: 

1. Loading and execution of standard system routines. 
For example: 

a. FORTRAN compilation. 

b. META-SYMBOL assembly. 

c. Punched card-to-magnetic tape conversion. 

d. MONARCH system updating. 



A MAGPAK may be used in place of two magnetic tape 
units. 



2. Loading and execution of previously compiled or 
assembled programs for checkout or production runs. 
For example: 

a. Run a previously compiled ALGOL program. 

b. Run a program consisting of several previously 
compiled subprograms and a previously com- 
piled FORTRAN main program. 

3. Combined assembly, loading, and execution of pro- 
grams for checkout or production runs. For example: 

a. Compile-and-go execution of FORTRAN pro- 
grams. 

b. Assemble-and-go execution of symbolic pro- 
grams. 

4. Combinations of the above functions. In the follow- 
ing examples the phrases "job stack" and "batched 
job stack" refer to the collection of control infor- 
mation, programs, and data which are to be pro- 
cessed under control of the MONARCH monitor 
routine. For example: 

a. A series of META-SYMBOL assemblies. 

b. Several META-SYMBOL assemblies intermixed 
with one or more META-SYMBOL object pro- 
grams to be assembled and then executed. 

c. A mixed batch requiring that any or all 
MONARCH functions be carried out in an 
arbitrary sequence determined by their order in 
the batched job stack. 

5. Loading of standard input/output routines prior to 
loading and executing previously assembled pro- 
grams, so that these standard routines can be exe- 
cuted upon request from the program being run. For 
example: 

a. Loading standard input/output routines from the 
system tape. 

b. Loading a conversion routine or trigonometric 
function routine from the MONARCH library. 

HOW MONARCH PERFORMS ITS FUNCTIONS 

The MONARCH operating system performs its functions 
between jobs and does not exercise control over the exe- 
cution of a program once that program has been loaded 
and control has been transferred to it. The functions are 
indicated to MONARCH via control messages. 

Upon request, MONARCH loads a program and then re- 
linquishes control of the computer and its associated pe- 
ripheral equipment to the program. The only possible 
way MONARCH can regain control of the computer is if 
MONARCH is reloaded from the system tape. This may 



be done manually by the console operator or under pro- 
gram control by the program being executed. 

SALIENT MONARCH FEATURES 

The salient features of MONARCH are: 

1. The system minimizes the amount of manual interven- 
tion required to execute a succession of independent 
or related programs on the computer. 

2. Core memory requirements for the monitor routine 
are minimized during program execution; that is, 
the monitor performs its functions between program 
executions, and MONARCH holds only those in- 
structions and data required for continuity of oper- 
ation during program execution. 



6. 



The amount of control information that must be 
furnished to the monitor and the system routines is 
held to a minimum. 

The control information for all system functions 
is presented in a consistent and straightforward 
manner. 

Insertion and deletion of routines from the system 
are accomplished via a simple update routine. 

Routines to be added to the system are introduced 
in the standard format used for assembly program 
output. That is, almost any program which can be 
assembled by SYMBOL or META-SYMBOL can be 
incorporated into this operating system as a stan- 
dard system routine. 



2. MONARCH CONTROL MESSAGES AND FUNCTIONS 



When the MONARCH system is loaded, the monitor 
takes control of the computer and obtains the first item 
of control information from the console typewriter. This 
item may be any legal control message. With a C con- 
trol message, the operator may specify that future con- 
trol messages are to be obtained from other input media. 
Control messages may be entered through the following 
input media: 

console typewriter 

punched cards via an on-line card reader 

punched paper tape via a paper tape reader 

magnetic tape via a magnetic tape unit (other than 
the one on which the system tape is mounted) 

When the monitor obtains a control message from a medi- 
um other than the typewriter, it types the message be- 
fore executing the function requested. (The operator 
may direct the monitor to print the control message on 
an on-line printer. See "Operating Procedures," Sec- 
tion 6.) In this way the monitor informs the console op- 
erator of the functions being performed under its control 
and maintains a written record of such functions. The 
monitor tells the operator that a given function is com- 
pleted by typing the next control message or by request- 
ing the next one from the typewriter. 

SYNTAX OF CONTROL MESSAGES 

Regardless of which device the monitor accesses for con- 
trol information, the format of the messages is the same: 



Af. 



* A ?y ??....? 



A (1 character) indicates the beginning of a message. 

f (1 to 8 alphanumeric characters) is a mnemonic con- 
trol function code. 

A indicates a space. These symbols are used to indi- 
cate the minimum number of spaces which must sep- 
arate the function code and the first parameter. 



1 



(1 < i < 24) is a symbolic, numeric, or literal para- 
meter that provides necessary control information 
related to the control function (f). For example / a 
request for the system loader to load a program 
must indicate the intitial load relocation bias for 
the program that is to be loaded. A maximum of 24 
parameters may be specified in one control message. 

A separator. Acceptable separators are 

, =><$[ ]*/()A'@ 



(1 character) indicates the logical end of message. 
The physical end of message is indicated by the end 
of record in the case of magnetic tape and cards or 
by a carriage return in the case of paper tape and 
typewriter. The logical end of message is required 
only when comments are included. 

Regardless of the length of the record containing a con- 
trol message, the routine that scans control messages ex- 
amines only the first 72 characters (18 words) of the 
record. Therefore, the period indicating the end of the 
message must occur prior to the 73rd character of the 
record. 

The first character of a control message is a delta (A). 
This character and the function code may be contiguous 
or may be separated by one or more spaces. When the 
function does not require a parameter list, the function 
code is followed by a period; otherwise, a space sepa- 
rates the parameter list from the function code. 

Various control messages require different numbers of 
parameters. If more than one parameter is required, all 
but the last must be followed by a separator; the last one 
is followed by a period. 

CONTROL MESSAGE PARAMETERS 

The monitor converts parameters in a MONARCH control 
message into a standard internal form. Except for literals 
(see below), it represents parameters internally as single- 
precision, 24-bit, binary values. Hence, the "value" 
of a parameter is its internal representation as a binary 
quantity or bit pattern, and it is the "value" of a para- 
meter that is ultimately examined by the subroutine in 
the monitor which processes the specific function code. 
This method of parameter conversion usually allows many 
ways of representing a given value externally. For ex- 
ample, the control message parameters '000A' (literal 
parameter) and MT1W (symbolic parameter) have the fol- 
lowing internal representations or values: 



'000A' 
MT1W 



00000021 
00203611 



which could be entered as numeric parameters. 
NUMERIC PARAMETERS 

A numeric parameter may be written as: 

1. An octal integer, consisting of up to nine octal dig- 
its, the first of which must be zero. An octal in- 
teger may be preceded by an algebraic sign: 

047, +062, -0, 0, 077777777, -032154767 



2. A decimal integer, consisting of up to eight deci- 
mal digits the first of which must not be zero. A 
decimal integer may be preceded by an algebraic 
sign: 

9, +532, -0, +21657899, -31579988 

The first digit of an octal integer must be zero in order 
for MONARCH to distinguish it from a decimal integer. 

Unsigned octal parameters must have values less than 
2^4; signed octal parameters and all decimal parameters 
must be less than 2^3. If the number of digits in a num- 
ber exceeds the applicable limit, the least significant 
digits are truncated. 

Regardless of the form used, the parameter is represented 
internally as a single-precision, signed, binary integer. 

LITERAL PARAMETERS 

A literal parameter consists of up to eight alphanumeric 
characters enclosed in single quotation marks (SDS inter- 
nal code of 14). Any legal character (see Appendix H) 
except a quotation mark may be written as a literal: 

1. A single-precision literal consists of up to 4 charac- 
ters: 

'A' 'A A B' 'RATE"A.3, ' 

2. A double-precision literal consists of up to 8 char- 
acters: 

'ABC 'LITERAL' 'ALPHA777' 'START:3. ' 

A literal parameter is represented internally as a left- 
justified string of internal character codes (six bits each). 
A single-precision literal isstored in one computer word. 
A double-precision literal is stored in two words: 

'ABCDEFGH' is stored in a and a + 1 as 

(a) =21222324 
(a+l) = 25262730 

Spaces (internal code of 60) are used to fill any unspec- 
ified character positions. For example: 

'ABC is represented internally as 21222360 

'ABCDE' is represented internally as 21222324 

25606060 



Double-precision literals are frequently used to desig- 
nate program names for MONARCH search functions. 
(See LOAD control message.) 

SYMBOLIC PARAMETERS 



The single quotation mark is not present on the type- 
writer; however, its internal code (14) is the same as 
that of the typewriter symbol @ (upper case 8). There- 
fore, whenever input is from the typewriter, the symbol 
@ must be used in place of the single quotation mark. 



Symbolic parameters are symbolic representations of par- 
ameters associated with many of the control messages ex- 
plained later in this section. 

Symbolic parameters consist of up to four characters, the 
first of which must be alphabetic and the remaining either 
alphabetic or numeric. Each symbolic parameter has a 
predetermined value (24 bits) which is stored in MON- 
ARCH'S table of symbolic parameters. Use of a symbol 
not defined in this table causes the control message in 
which the undefined symbol appeared to be ignored and 
an error message to be typed. 

A octal parameter with the same value may be substi- 
tuted for any symbolic parameter in a control message. 

Listed below are the symbolic parameters used to specify 
input/output devices to the MONARCH system. In this 
list, h specifies the channel and is actually written as W 
or Y for 900 Series Computers or A, B, C, or D for 9300 
Computers. Throughout this manual, references are made 
to the M W" and "Y" buffers; users of the 9300 Computer 
should substitute the appropriate channel letters in these 
places. If h is omitted from a parameter, channel W (or 
A) is assumed. The n specifies the unit number. 

Parameter Definition 

CR designates the card reader where there is 

only one. 

CRnh designates card reader n on channel h. 

CPnh designates card punch n on channel h. 

PRnh designates paper tape reader n on channel h. 

PPnh designates paper tape punch n on channel h. 

TY designates the console typewriter (i.e., 

typewriter 1 on channel W). 

MTnh designates magnetic tape unit n on channel h. 

DFnh designates RAD File n on channel h. 

LP designates the line printer (i.e. , line 

printer 1 on channel W). 

S designates the system tape (i.e. , magnetic 

tape unit on channel W). 

CONTROL MESSAGE FORMATS 

The user directs the operation of the MONARCH system 
via control messages which may be input from the type- 
writer, punched paper tape, or punched cards. Most 
frequently, the control messages are on punched cards 
preceding the user's input card decks. 



System Control 

JOB 

ENDJOB 

ASSIGN (ONLINE) 

Processor Control 

METAXXXX* 

SYMBOL 

FORTRAN 

RTFTRAN 

ALGOL 

Input Control 

FILLSYS 
LOAD 
FORT LOAD 
RTFTLOAD 
FORT LINK 
ALGOLOAD 



Utility Functions 

C 

SET 

LABEL 

DISPLAY (SHOW) 

POSITION 

REWIND 

SKIPFILE 

SKIPREC 

BACKFILE 

BACK RE C 

WEOF 

BOOTLOAD 

CARDTAPE 

EOF 

System Maintenance 

UPDATE 



SYSTEM CONTROL 

JOB The JOB control message specifies the 

system is to be in "job mode". 

A JOB. 

When the system is set to job mode, it resets the proces- 
sor error switch. If an error occurs while a processor 
(such as FORTRAN or META-SYMBOL) is being exe- 
cuted, the processor error switch is set. Then, if the 
operation is a load-and-go (i.e., compile-and-execute 
or assemble-and-execute), the "load" function is not 
honored because of the processor error. If no error oc- 
curs during such a load-and-go operation, the "load" 
function is honored. 

The MONARCH system remains in job mode until an 
ENDJOB control message is encountered. Therefore, 
whenever a job is preceded by a JOB message, it should 
be followed by an ENDJOB (see below) as a courtesy to 
the next user who may not wish to assemble (compile) 
his program in job mode. 

END JOB This control message specifies that the 

system is not in job mode. 

A ENDJOB 



XXXX indicates the name of a set of system PROCs that 
will be used to interpret the program mnemonics during 
the META-SYMBOL assembly (e.g., META920, 
META910, META9300, METASPEC, etc.). META910 
will assemble on any machine and will produce binary 
output for 910. The set of PROCs is a A 2 record within 
the scope of the META-SYMBOL logical file (see "Sys- 
tem Update Routine" in Section 4 for an explanation of 
A 2 records). 



When an ENDJOB control message is received, MON- 
ARCH resets the processor error switch and terminates 
job mode. If a processor is being executed in a load- 
and-go operation not in job mode, MONARCH will 
honor the "load" function even if processor errors have 
occurred. 

The system will not return to job mode until it receives 
a JOB control message. 

ASSIGN ASSIGN (or ONLINE) enables the user 

ON LINE to specify the input and output media to 

be used during the current job. 

AASSIGN L=P r L=P 2 , ...,L=P . 
AONLINE L=P r L=P 2 , ...,L=P 9 . 

L is a system label. 

P is a symbolic parameter designating the specific device 
(see Symbolic Parameters). 

The labels for the standard unit assignments are: 

Label Reference 

SI Symbolic Input 

SO Symbolic Output 

BI Binary Input 

BO Binary Output 

EI Encoded Input 

EO Encoded Output 

LO List Output 

UI Update Input 

XI System Scratch 

X2 System Intermediate Output Scratch 

X3 System Scratch (magnetic tape) 

S System (magnetic tape) 

Labels for Logical unit assignments are: 



Label Reference 



LO 

LI 

L2 

L3 

L4 

15 

L6 

L7 

LCR 

LCP 

LLP 



Magnetic Tape 
Magnetic Tape 
Magnetic Tape 
Magnetic Tape 
Magnetic Tape 
Magnetic Tape 
Magnetic Tape 
Magnetic Tape 
Card Reader 
Card Punch 
Line Printer 



Logical Un 
Logical Un 
Logical Un 
Logical Un 
Logical Un 
Logical Un 
Logical Un 
Logical Un 



tO 
t 1 
t2 
t3 
t4 
t5 
t6 
\7 



Note: Ln may be assigned to any physical tape unit; 
i. e. , L0=MT2W, L2=MT7W, etc. 

The logical unit assignments are used in the Business Lan- 
guage and in FORTRAN II RAD MONARCH to permit re- 
assignment of unit numbers. 



X2 must be assigned to magnetic tape unit 2 (MT2) 
under MAGPAK environment when using META-SYMBOL. 



At I east one pair of parameters must be given, and a maxi- 
mum of nine pairs is allowed per control message. The 
valueof the first parameter must bea label specifying a 
unit assignment entry; e. g., SI, LO, etc. The value of 
the second parameter must be a legal peripheral device 
designation on an existing channel; e. g. , PR1W, MT3Y, 
etc. The symbolic parameter associated with the periph- 
eral device should be consistent with the flow of infor- 
mation; that is, it would be illegal to assign BI=CP1W 
(binary input to be entered from the card punch). 

Once a unit assignment has been made, it remains in 
effect until a new assignment for that label is made. 

When a logical tape is assigned to the RAD for execution 
of a FORTRAN program, it should be assigned to XI or 
X2, where XI or X2 has been assigned to the RAD. This 
permits up to two such files to be simultaneously active. 

Examples: 

A ASSIGN BI=CRlW,BO=CPlW. 

This message assigns card reader 1 on the W buffer as 
the binary input device and card punch 1 on the W buf- 
fer as the binary output device. 

AONLINE LCR=CR1W, LLP=LP1W, L2=MT1W. 

This message assigns card reader 1 on the W buffer as 
the card input device, printer 1 on the W buffer as the 

wii~i me kyiiinc^i, umu u aoirfWMsj nivj^i 101 1 1* lUpc \l_^-/ Qd 

magnetic tape physical unit 1 on the W buffer. This 
ONLINE statement assigns LCR, LLP, and L2 in BAT 
(Business Language Assignment Table, which is de- 
scribed in Appendix A). 

Note that magnetic tape units are numbered through 
7; all other devices are numbered from 1. 

A ASSIGN BI=CR1W,S=MT0W,LCR=CR1W. 
A ASSIGN LLP=LP1W,L2=MT1W. 

These messages assign: (1) card reader 1 on the W buffer 
as both the binary input device and the card reader for 
a Business Language program; (2) magnetic tape unit 
on the W buffer as the system tape; (3) line printer 1 on 
the W buffer as the on-line printer for a Business Lan- 
guage program; and (4) the magnetic tape physical unit 
1 on the W buffer as the magnetic tape logical unit 2 
of a Business Language program. 

PROCESSOR CONTROL 

METAXXXX (900 Series only) This control message 

directs MONARCH to load and transfer control to the 
MET A- SYMBOL assembly system. 

AMETAXXXX P^P^CCONC, EXCP, SET. 

XXXX specifies which procedure-oriented library 

MONARCH is to load prior to the assembly. Thus, 
the control message may be written as: 

AintCTAOOn r__ oon i _„r_..j._j i:i 

iL-wvu- i /-v/z.v/ iui / t-\j fjioi_cuui e-ui lemeu nuiuiy. 

AMETA910 for 910 procedure-oriented library. 



AMETA9300 for 9300 procedure-oriented library. 



AMETAB910 
AMETAB920 
AMETAB93H 



for 900 Series special -purpose pro- 
cedure-oriented library for busi- 
ness data processing. 

The user may provide his own procedure-oriented 
library on the system tape. It must be identified 
by a unique, 4-character name. That name is then 
used in place of XXXX in the METAXXXX control 
message. 

specifies type of input: 



Parameter 

SI 
EI 



Type of Input 

Symbolic Input 
Encoded Input 



P^ specifies type of output: 

Parameter Type of Output 



SO 


Symbolic (Source) Output 


EO 


Encoded Output 


BO 


Binary Output 


LO 


List Output 
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tion of symbolic input is desired. Use of this param- 
eter enables the user to translate a SYMBOL-4 or 
SYMBOL-8 source program into META-SYMBOL 
source form. 



CONC (optional) specifies that a concordance listing 
is to be produced by META-SYMBOL. 



EXCP (optional) specifies that exceptions are to bemade 
to the concordance listing as designated on META- 
SYMBOL control cards INCLUDE and EXCLUDE. If 
EXCP is present, CONC is not specified. 

SET (optional) specifies that a larger table should be re- 
served for use by the META-SYMBOL preassembler 
to accomplish translation of standard system pro- 
cedures to the user's program format. This parame- 
ter is not necessary when the control message is 
META920, META910, or META9300, but should be 
used with a call for the XDS Business Language. SET 
may also be necessary for future higher order lan- 
guages implemented in META-SYMBOL. 



"Concordance listing" refers to a listing of the symbols 
appearing in the META-SYMBOL source program, along 
with a reference to the instructions in which the symbols 
appeared. INCLUDE control cards may be used to limit 
concordance listing to specific symbols only; EXCLUDE 
control cards enumerate specific symbols which are to be 
omitted from the concordance listing. 



The parameters may be listed in any order. One input 
and one output specification must be given. Multiple 
outputs may be requested. 

M ETA -SYMBOL assumes that the necessary input/output 
units have been assigned and that all tape units, except 
scratch tapes, are correctly positioned before MONARCH 
relinquishes control to it. 

Examples: 



AASSIGN SI=CR, LO=LP, S=MT0W, X1=MT1 W. 
AMETA920 SI, LO. 

This message sequence requests META-SYMBOL to as- 
semble a symbolic source program and produce an assem- 
bly listing as the only output. 

AASSIGN S=MT0W, SI=CR, BO=PPlW, LO=LP. 
AASSIGN X1=MT1W. 
AMETA9300 SI, BO, LO, CONC. 

This sequence requests META-SYMBOL to assemble a 
symbolic source program from cards and to produce a 
binary output on paper tape and an assembly listing and 
concordance listing on the line printer. 

SYMBOL The SYMBOL control message directs 

MONARCH to load and transfer control to the SYMBOL 
assembly system. 

ASYMBOL P, P 

P. specifies which mnemonic table is to be used dur- 
ing the assembly: 

Parameter Mnemonic Table 



910 


910 


920 


920 


9300 


9300 



specifies output data from SYMBOL: 
Parameter Type of Output 



BO 
LO 



Binary Output 
List Output 



The parameters may appear in any order. Only one 
mnemonic table (P^) may be specified; at least oneout- 
put specification parameter (P2) must be present. Sym- 
bolic input is assumed; therefore, SI should not be present 
as a parameter, but must be ASSIGNed. 

Under MONARCH, SYMBOL has no initial halt to 
ready input, in contrast to previous bootstrap versions. 
Therefore, it is particularly important in the case of 
symbolic input from the paper tape reader (a device 
which has no device ready test) that the paper tape 
be ready at the time SYMBOL is loaded. 

Each SYMBOL control message should be preceded by 
an ASSIGN control message, establishing the desired 
unit assignments. The ASSIGN card is indicative of 
device only; i.e., it supplants the typewriter control 



message of bootstrap versions and causes SYMBOL to 
load its own preset I/O package. 

Example: 

AASSIGN S=MT0W, SI=CR, LO=LP. 
AASSIGN BO=PPlW,Xl=MTlW. 
ASYMBOL 9300, LO, BO. 

This sequence of messages requests a SYMBOL assembly 
from cards, using the 9300 mnemonic table. The output 
from the assembly is to be a program listing on the line 
printer and an object program on punched paper tape. 

FORTRAN (900 Series only) This control message 

causes MONARCH to load and relinquish control to the 
FORTRAN II compiler. 

AFORTRAN P r P 2 / p 3 - 
P. specify type of input and output: 



Parameter 

SI 

BO 

LO 



Type of Transmission 

Symbolic Input 
Binary Output 
List Output 



Any or all of the parameters may be omitted. Symbolic 
input is always assumed. The presence of the BO param- 
eter causes an object program to be generated. The LO 
parameter causes an output listing to be produced. If no 
I/O unit assignment has been made to the BO or LO de- 
vice, that parameter is ignored. 

Examples: 

AFORTRAN. 

This message requests FORTRAN to compile a source pro- 
gram; no listing or object program is produced; only the 
program allocation, diagnostics, and any erroneous 
source line(s) will be listed. 

AASSIGN S=MT0W, SI=CR, LO=LP,Xl=MTlW. 
AFORTRAN BO,LO. 

This sequence of messages requests FORTRAN to compile 
a source program read from cards (SI is assumed if it is 
not present) and to produce an output listing. No object 
program is produced since no BO unit assignment was 
made. 



RTFTRAN (900 Series only) This control message 

causes MONARCH to load and relinquish control to the 
Real-time FORTRAN II compiler. 

ARTFTRAN P^'V 

P. specify type of input and output consistent with the 
format of the above mentioned FORTRAN control message. 



8 



ALGOL The ALGOL control message causes 

MONARCH to load and transfer control to the ALGOL 
compiler. 

AALGOL P^'V 

P. specify the input/output devices to be used by 
' ALGOL. 



Parameter 



Type of Transmission 



LS List Source 

LO List Object Code 

BO Binary Output 

The parameters may appear in any sequence, and any 
or all may be omitted. ALGOL always reads source in- 
puts from the device previously assigned to SI. When 
a listing of the source program is requested (LS param- 
eter), the listing is produced on the LO device. The 
LO device must be a line printer. When requested to 
list object code (LO parameter), ALGOL produces the 
list on the LO device. The BO parameter specifies that 
ALGOL is to produce a binary object program on the 
BO device. 

If no output device 'gs specified and an error occurs dur- 
ing compilation, an error message is produced on the 
console typewriter. 

Note: ALGOL must have a scratch tape available to it 
and will automatically use the magnetic tape 
previously assigned to XI. 

Example: 

AASSIGN S=MT0W, SI=CR, LO=LP, BO=PPlW. 
AASSIGN X1=MT1W. 
AALGOL LS, LO,BO. 

This sequence of control messages requests the ALGOL 
compiler to read a source program from cards, compile 
it, listing the object and source programs on the line 
printer, and output the binary object program on punched 
paper tape. The magnetic tape unit 1 on the W buffer 
is to be the compiler's scratch tape. 

A ADAPT* (900 Series only) No parameters. This 

control message directs MONARCH to load and transfer 



The ADAPT compiler is not part of the standard MON- 
ARCH system, but is available on request for the tape 
MONARCH system only. When the ADAPT FORTRAN II 
MONARCH system tape is generated, only the following 
programs should be included on the system tape: 

1. MONARCH control 

2. I/O handler 

3. FORTRAN II linking system 

4. FORTRAN II compiler' 

5. FORTRAN II loader 

6. FORTRAN II library 

7. MONARCH tape update routines 

8. SYSEND 



control to the ADAPT numerical control compiler. 
LINKZEROis loaded and control is transferred to it. This 
in turn reads the next control record which must contain 
the I ink number of the next linkto be executed in column 4. 

Example: 



AADAPT. 
1 



AAA 

This message sequence loads LINKZERO which in turn 
loads link 1 of the ADAPT compiler. Each link there- 
after calls the next link until compilation is terminated. 

A MANAGE* (900 Series only) No parameters. This 
control message causes MONARCH to load and transfer 
control to the MANAGE executive routine. 

A DICTIONA* (900 Series only) No parameters. This 
control message is used in conjunction with MANAGE. 
It causes control to be transferred from the Executive 
routine to the Dictionary generator. 

INPUT CONTROL 

FILLSYS This control message transfers control to 

the monitor's bootstrap routine which will reload the 
MONARCH system. 

AFILLSYS. 

There are no parameters. The message is equivalent to 
executing an unconditional branch to memory location 
00001. 

LOAD The LOAD message directs the MON- 

ARCH loader to load one or more binary object programs. 

ALOAD P r P 2 /P 3 - 

P 1 is the load relocation bias, expressed as a positive 
octal or decimal integer, for the first (or only) pro- 
gram to be loaded. For programs whose load ad- 
dresses and data words are not relocatable (i. e. , ab- 
solute programs), the load relocation bias is ignored. 

P« is the loader options parameter. The options are: 

Parameter Interpretation 



STOP 



Stop after each program is loaded (i. e. , 
after each end record is read); no sym- 
bol table output and no return to the 
routine that called the loader. Octal 
equivalent of the symbolic parameter 
STOP is 10000000. 



The MANAGE system is not part of the standard MON- 
ARCH system, but is available on request for the tape 
MONARCH system only. The MANAGE system tape 
must be generated with the Dictionary generator. The 
form and contents of this tape are specialized and will 
be supplied to the user upon request. 



Parameter Interpretation 

GO No halt after processing end record 

with transfer address; no symbol table 
output and no return to the routine 
which called the loader. Octal equiv- 
alent of the symbolic parameter GO 
is 40000000. 

TSTP Same as STOP except that the loader's 

symbol table is output. Octal equiva- 
lent of the symbolic parameter TSTP is 
20000001. 

TGO Same as GO except that the loader's 

symbol table is output. Octal equiva- 
lent of the symbolic parameter TGO is 
60000001. 

If the loader is not requested to output the symbol 
table and unsatisfied Programmed Operator refer- 
ences or definitions occur, an error message and the 
unsatisfied references and/or definitions are typed, 
and MONARCH halts. If these unsatisfied refer- 
ences/definitions will not affect the operation of 
the program, the operator can clear the halt and 
the program will be executed. Otherwise, he can 
take appropriate action. When the loader is re- 
quested to output the symbol table, it produces the 
table on the line printer if Breakpoint 1 is set or on 
the typewriter if Breakpoint 1 is reset. 

P„ is an optional parameter that is interpreted as a 
program identification label assumed to occur in 
characters 9 through 16 of a level 1 MONARCH 
ID record on the current binary input unit (see Ap- 
pendix B for a description of record formats). 

At least one (Pj) and three parameters at most must be 
given for the LOAD control message. When parameter 
P3 is present, its value is converted to a left adjusted, 
space-filled, 8-character search key. The monitor 
causes records to be read from the unit assigned for bi- 
nary input (BI) until (1) a level 1 MONARCH ID record, 
with the same name in characters 9 through 16, is ob- 
tained or (2) the last file has been scanned (i.e., until 
a level 1 MONARCH ID record with "SYSENDaa" in 
characters 9 through 16 is encountered). In the first case 
control is relinquished to the MONARCH loader that pro- 
cesses the input as specified by the first two parameters. In 
the second instance, a message SEARCH FOR SPECIFIED 
ROUTINE FAILED is typed, and the next MONARCH 
control message is requested. A detailed description of 
the MONARCH loader is given in Section 3. 

Prior to processing a load function, the monitor interro- 
gates the processor error switc h and the job mode switch (see 
JOB control message for an explanationof these switches). 
If both switches are set, the requested load function is 
aborted. An appropriate error message (PROCESSOR 
ERROR. . . ) is printed, and typewriter 1 on the W buffer 
is selected for input of a control message. 



txamples: 

ALOAD 01 0000, STOP. 

This message causes the MONARCH loader to load one 
or more programs, beginning in location lOOOOg. Input 
is from the current BI device, and the loader stops (halts) 
after each program is loaded (i. e. , after each end record 
is read). 

ALOAD 2048, TSTP. 

This message causes the MONARCH loader to load one 
or more programs, beginning in location 4OOO3 (2048j q) . 
Input is from the current BI device, and the loader halts 
after each program is loaded (i.e., after each end record 
is read). After loading is completed and prior to program 
execution, the symbol table is output. 

ALOAD 0, TGO, 'FILENAME'. 

This message (input from cards) causes the MONARCH 
loader to find program FILENAME (as a level 1 ID record) 
on the specified BI unit and to load the program with 
relocation (i. e. , as an absolute program). The loader's 
symbol table is output prior to program execution. If in- 
put is from the typewriter, this message would appear 
as 

ALOAD 0,TGO,@ FILENAME®. 

(See discussion on "Literal Parameters.") 

ALOAD GO. 

This message forces a load relocation bias of and may 
be used to load absolute programs. 

F0RTL0AD (900 Series only) The FORTLOAD control 

message causes MONARCH to load and transfer control to 
the FORTRAN loader. The parameters in the control mes- 
sage specify the mode in which the FORTRAN loader is to 
operate and the input devices from which it is to read. 

AFORTLOAD P^P^Pg,. . .,P g . 

P. consists of up to eight parameters that may be given. 
The first three specify the mode in which the FOR- 
TRAN loader is to operate: 

MAP Produce a storage map of the program on the 
console typewriter. 

LMAP Produce a label map on the console type- 
writer. 

LTRA Produce a label trace at execution time. 



The output resulting from the use of this parameter is de- 
scribed in Section 6. 
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These three parameters may appear in any order or 
may be omitted entirely. If they appear, they must 
be the first in the parameter string. The other pa- 
rameters specify which input devices are to be read 
(e.g. , XI, BI); at least one input device must be 
specified. Information is loaded from the devices 
in the order they appear in the parameter list. These 
devices must have been assigned and correctly posi- 
tioned before the FORTRAN loader is called. 

The FORTRAN loader automatically loads the previously 
compiled program, which must be on the first input device 
specified by the parameters. When additional input de- 
vices are specified (i. e., inadditiontotheunit fromwhich 
the program is read), the loader reads from these devices 
only routines that are necessary because of unsatisfied 
references/definitions. However, if the user wishes to 
have the loader load from the additional devices uncon- 
ditionally (i. e. , regardlessof whether or not the program 
references any of the routines read from that device), he 
places the letter U after the appropriate parameter. 

Example: 

A AS SIGN BI=MT1W,X1=CR1W. 
AFORTLOAD MAP, LTRA, BI, XI U. 

The FORTRAN loader will read a previously compiled 
FORTRAN program from magnetic tape unit 1 and will 
read, unconditionally, from the card reader. It will 
produce a storage map of the program and a label trace 
as the program is executed. 

RTFLOAD (900 Series only). This control message 

causes MONARCH to load and transfer control to the 
Real-time FORTRAN loader. The parameters specify the 
mode in which the loader operates and the input devices 
from which it reads. 

ARTFLOAD P r P 2 ' P 3'--" P 8- 

Pj consists of up to eight parameters that may be given. 
The first three specify the mode in which the FORTRAN 
loader operates; the narrative is consistent with that of 
FORTLOAD. 

FORTLINK The FORTLINK control message causes 

MONARCH to load and transfer control to the FORTRAN 
loader. This message is used only when a link tape is to 
be generated. Linking is discussed in Appendix E. 

AFORTLINK P 1 ,P 2/ P 3/ ... / P 9 . 

P 1 is the identification number to be assigned to the 
link about to be written on magnetic tape; it maybe 
any three decimal digits. 

P 2 same as P; for FORTLOAD. 

ALG0L0AD This control message causes MONARCH 

to ioad and transfer control to the ALGOL ioader. The 
parameter is optional. 



AALGOLOAD BI 

BI (optional) specifies binary object program input. 
The ALGOL loaderalways reads binary object pro- 
grams from the device previously assigned to BI. 

After loading an ALGOL-compiled object program, the 
ALGOL loader searches the system tape (magnetic tape 
unit on the W buffer) for any referenced library pro- 
grams. 

Examples: 

AASSIGN BI=CR. 
AALGOLOAD. 

This sequence of control messages causes the ALGOL 
loader to load a binary object program from the card 
reader, to load any referenced library programs from 
magnetic tape unit 0, and to transfer control to the ob- 
ject program. 

AASSIGN BI=MT2W. 
AALGOLOAD BI. 

These messages cause the ALGOL loaderto reada binary 
object program from magnetic tape unit 2. Then, the 
loader reads the system tape, loads the required library 
programs, and transfers control to the object program. 

UTILITY FUNCTIONS 

C The C control message directs MONARCH 

to accept future control messages from a specific input 
device. 

AC P p 

P. must be a legal input unit assigned to an existing 
buffer. 

Parameter Definition 

CRnh Designates card reader n on buffer h. 

MTnh Designates magnetic tape unit n on 

buffer h. 

PRnh Designates paper tape reader n on buf- 

fer h. 

TYnh Designates typewriter n on buffer h. 

Unless a C control message directs otherwise, MONARCH 
automatically accepts control messages from the console 
typewriter (1 on the W buffer). 

Once a C message has been processed, MONARCH im- 
mediately attempts to read a control message from the 
newly assigned device. 

Example: 



AC PR1W. 

This message assigns paper tape reader 1 on the W buffer 
as the control message input device. 
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SET This control message enables the user to 

set the contents of a specified memory location to a 
given value and is operative only if the MONARCH 
monitor is in control. 



A 
V 



ASET A=V 

is any legitimate memory address 

is the value to be stored in location A 



If the 



value exceeds 2^3-1 / the most significant digits 
are stored. 



A and V may be expressed as either octal or decimal 
numeric parameters. 

Examples: 



ASET 01 7= -59. 

This message will cause the contents of memory location 
00017 o to be set to 77777705 (-59 =-73j. 

ASET 64=077777. 

This message will cause the contents of cell 100 R (64._) 
to be set to 00077777. B ' 



ASET 0235=001000114. 

This message will cause the instruction BRU 00114 to be 
stored in location 00235 ft . 

LABEL The LABEL control message enables the 

user to write a level 1 or level 2 MONARCH ID record 
on a magnetic tape or on the RAD (see Section 4 "Sys- 
tem Update Routine" for a discussion of MONARCH ID 
records). 

ALABEL P r P 2 ,P 3 - 

P 1 is the value 1 to indicate a level 1 ID record or the 
value 2 to indicate a level 2 ID record. 

P_ is the unit on which the ID record is to be written. 
The value of this parameter must be either a legal 
logical or physical magnetic tape unit designation 
on an existing buffer (e. g. , MT3W to specify mag- 
netic tape unit 3 on the W buffer) or "BO", if the 
RAD file is to be labeled. 

P_ is a double- or single-precision literal, usedtocon- 
struct an 8-character name. If fewer than eight 
characters are given, the name field will con- 
tain (trailing) spaces in the right-most character 
positions. 

A level 1 or level 2 MONARCH ID record (indicated by 
the first parameter) is constructed with the name field 
(characters 9 through 16) containing the identifier spec- 
ified as the third parameter. The ID record is then writ- 
ten on the magnetic tape designated by the second pa- 
rameter. A magnetic tape ID record consists of 40 char- 
acters (characters 17 through 40 are blanks) written in 
binary ("odd" parity) mode. 



Example: 

ALABEL 2,MT3W,'FILENAME'. 

This message will cause MONARCH to write a level 2 
MONARCH ID record on magnetic tape unit 3 on the 
W buffer. Characters 9 through 16 of this record will 
contain FILENAME. 

Normally, the only labels of which RAD MONARCH is 
cognizant are those in the Directory (D file) which were 
entered at the time the RAD system was generated (see 
Appendix H). Since, however, the BO file immediate- 
ly follows the S file, additional binary programs may be 
added to the system (S file) by issuing a LABEL control 
message before each such program is generated. After 
the last program, the message 

ALABEL ^BO/SYSEND' 

should be issued to cause the end of the system to be re- 
defined as following the last location in the BO file. 

DISPLAY DISPLAY (or SHOW) allows the user to 

SHOW produce the contents of one or more 

memory locations on the console typewriter and is op- 
erative only if the MONARCH monitor is in control. 

ADISPLAY P. THRU ? r 

ASHOW P 1 THRU ? T 

P 1 (required) must be a legitimate memory address. If 
it is the only parameter given, it designates the one 
location whose contents are to be displayed. If 
three parameters (P.., THRU, and P.) are given, P 1 
is the beginning address of the sequential memory 
locations whose contents are to be displayed. 

THRU (optional). When the contents of more than one mem- 
ory location are to be displayed, the second param- 
eter of the control message must be the word THRU. 

P_ (optional). When present, this parameter must be 
a legitimate memory address which is equal to or 
greater than the value of P. . P„ specifies the end- 
ing address of the sequential memory locations whose 
contents are to be displayed. 

After interpreting the parameters, MONARCH converts 
the contents of each designated memory location to 
octal and types each value, together with its octal 
address on typewriter 1 on the W buffer. 

Examples: 

If location 037777 contains zero, the message 

ADISPLAY 037777. 
will cause the following to be typed: 

037777 = 00000000 
The message 

ASHOW 0164 THRU 0174. 
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will cause the address and contents of each of the 9 
locations specified to be typed. 

POSITION This control message enables a user to 

position a magnetic tape or the RAD at a given logical 
file (identified by a MONARCH level 1 ID record only 
— not a level 2 record; ID records are described under 
11 System Update Routine" in Section 4). 

APOSITION P y ? r 

P. must be a legal magnetic tape unit or logical unit 
designation on an existing buffer; e.g., MT3W spec- 
ifies magnetic tape unit 3 on the W buffer, BI spec- 
ifies the tape or RAD-assigned BI file. 

P~ is a literal consisting of up to eight alphanumeric 
characters. Trailing blanks (60g) are supplied if 
fewer than eight characters are given. The value 
of this parameter is used as the search key. 

To position the specified magnetic tape or logical unit 
at the desired logical file, the MONARCH Search sub- 
routine reads successive records (in a forward direction) 
until a level 1 MONARCH ID record is found that con- 
tains, in characters 9 through 16, the given file identi- 
fication (P2). The tape is read in binary ("odd" parity) 
mode, and the maximum ID record length is assumed to 
be 40 words (160 characters). The search is terminated 
as follows: 

1. If characters 9 through 16 of a level 1 ID record 
contain the logical file ID specified as the second 
parameter, control is returned to MONARCH to ob- 
tain the next control message. The tape will be po- 
sitioned in the interrecord gap which follows the 

ID record. 

2. If characters 9 through 16 of a level 1 ID record 
contains SYSEND AA , a message is typed indicating 
that the specified logical file was not found. Then 
control is returned to MONARCH to obtain the next 
control message. 

3. If characters 9 through 16 of a level 1 ID record 
contain neither SYSEND AA nor the specified logi- 
cal file ID, the search is continued until either 
condition 1 or condition 2 is satisfied, or until the 
computer operator intervenes. 

Access to RAD-assigned S or BI files is random, since 
all level 1 names are retained in a directory. 



Examples: 

APOSITION BI, 'FILEIDEN'. 
APOSITION MT2W, 'FILEIDEN'. 

Input from cards, the latter message will cause MON- 
ARCH to position magnetic tape unit 2 on the W buffer 
in front of the first record, following the ievei 1 MON- 
ARCH ID record that contains FILEIDEN in characters 9 



through 16. If input is from the typewriter, this message 
would appear as 

APOSITION MT2W, @FILEIDEN@. 

(See discussion on "Literal Parameters".) 

REWIND The REWIND control message causes 

MONARCH to rewind a specified magnetic tape unit or 
perform a pseudo-rewind on a specified disc file. 

AREWIND P ] 

P 1 must be a legal magnetic tape unit or logical unit 
designation on an existing buffer; e.g., MT3W or 
BO. If the logical unit specified has been assigned 
to a disc file, MONARCH performs a pseudo-rewind 
so that a subsequent read or write operation will 
start at the beginning of the file. 

A disc file may be specified in a REWIND message 
only as a logical unit, such as SI or BO; it is not 
permissible to specify the disc file directly with a 
symbolic parameter such as DF1B. 

Example: 

AREWIND MTOW. 

will cause MONARCH to rewind magnetic tape unit 
on the W buffer. 

SKIPFILE These control messages cause MONARCH 

SKIPREC to skip files or records in a forward direc- 

tion on a specified magnetic tape unit (see also, BACK- 
FILE and BACKREC). The magnetic tape unit and num- 
ber of files or records to be skipped are specified by the 
control message parameters. 



ASKIPFILE P r P 2 . (skip files) 
ASKIPREC P,,P 2< (skip records) 



P 1 must be a legal magnetic tape unit designation on 
an existing buffer; e.g., MT2W designates magnetic 
tape unit 2 on the W buffer. 

P 9 specifies the number of files or records to be skipped. 

After interpreting the parameters, MONARCH moves the 
specified mangetic tape forward the indicated number of 
files or records. If an EOF mark is encountered during a 
skip record process, the tape will stop. Thus, the tape 
will be positioned immediately after the EOF. 

Examples: 

ASKIPFILE MT1W,5. 

This message causes MONARCH to skip forward 5 files 
on magnetic tape unit 1 on the W buffer. 



SKIPhlLE, BACKFILE andWEOF descriptions havenot been 
altered, therefore, they still apply only to magtape. 
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ASKIPREC MT3YJ0. 

This message causes MONARCH to skip forward 10 (1 2 _) 
records on magnetic tape unit 3 on the Y buffer. 

BACKFILE These control messages have a function 

BACKREC similar to that of SKIPFILE and SKIPREC; 

however, with BACKFILE and BACKREC the magnetic 
tape is moved in a backward direction. 

ABACKFILE P r P 2 . 

ABACKREC P r P 2 . 

P^ and ?2 have the same interpretation as for SKIPFILE 
and SKIPREC. 

After interpreting the parameters, MONARCH moves the 
specified magnetic tape backward the indicated number 
of files or records. If an EOF mark is encountered dur- 
ing a skip record process, the tape will stop. Thus, the 
tape will be positioned before the EOF mark. During a 
BACKFILE operation the user must backfile one plus the 
number of files to be skipped to return to a particular 
file of interest. 

Examples: 

ABACKFILE MTOY, 12. 

This message causes MONARCH to skip backward 12iq 
(14g) files on magnetic tape unit on the Y buffer. 
When the 12th file is skipped MONARCH will read for- 
ward over the 12th EOF mark so that the tape will be 
positioned to read the first record of the next file. 

ABACKREC MT2W,3. 

This message causes MONARCH to skip backward 3 rec- 
ords on magnetic tape unit 2 on the W buffer. 

VKEOF The WEOF control message directs MON- 

ARCH to write an end-of-fiie (EOF) mark on the speci- 
fied tape. 



AWEOF P 



r 



must be a legal magnetic tape unit designation 
on an existing buffer or a legal paper tape punch 
unit designation on an existing buffer. That is, P] 
may take the form MTub or PPxb, where u must be 
within the range < u < 7, b is W or Y, and x is 1 
or 2. 



is to facilitate the loading of a FORTRAN-compiled 
program into the FORTRAN library on the system tape 
(see Section 4, "System Update Routine"). 

B00TL0AD This control message directs MONARCH 

to produce an absolute or relocatable bootstrap on paper 
tape or magnetic tape as specified. 

ABOOTLOAD P P 

P. must be ABS for absolute or REL for relocatable. 

P« must specify the magnetic tape unit or paper tape 
unit on which the bootstrap is to be produced; e.g., 
MT2W, PP1W for 900 series; or MT2A, PP1A for 
9300. 

MONARCH interprets the control message and produces 
the requested bootstrap on the specified tape. These 
bootstraps can load programs assembled by SYMBOL or 
META -SYMBOL. Although the bootstrap may be pro- 
duced on any paper tape or magnetic tape unit, it can 
be read from only paper tape unit 1 on the W buffer or 
magnetic tape unit on the W buffer, on 900 Series 
Computers. Substitute corresponding A channel for 
9300 Computers. 

Examples: 

ABOOTLOAD ABS,PP1W. 

This control message directs MONARCH to punch an 
absolute bootstrap on paper tape punch 1 on the W 
buffer. 

ABOOTLOAD REL, PP2W. 

This message causes MONARCH to punch a relocatable 
bootstrap on paper tape punch 2 on the W buffer. 

ABOOTLOAD ABS,MT1W. 

This message directs MONARCH to write an absolute 
bootstrap on magnetic tape unit 1 on the W buffer. To 
load the object program, dial the tape unit number to 
zero and execute a fill from magnetic tape: 

Set (XI) = -7 (7777777]) 

EOM 03610 (0 02 03610) 

WIM 2 (0 32 00002) 

BRU 1 (0 01 00001) 



Examples: 



AWEOF MT3W. 

This message causes MONARCH to write an end-of-file 
mark (17000000) on magnetic tape unit 3 on the W buffer. 

AWEOF PP1Y. 

This message causes a special end-of-file mark (17170000) 
to be punched on paper tape unit 1 on the Y buffer. (This 



Descriptions of the bootstrap routines are available from 
the XDS Program Library: 900 Series Paper Tape Abso- 
lute Bootstrap, catalog number 020020; 900 Series Paper 
Tape Relocatable Bootstrap, catalog number 000019; 
9300 Paper Tape Relocatable Bootstrap, catalog number 
600001. The magnetic tape bootstrap routines are modi- 
fied versions of the MONARCH boostrap loader. 
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Set the contents of register A to 32 00002. 

Set the contents of register C to 35 00001. 

Set the RUN-IDLE-STEP switch to STEP. 

Press START. 

Press FILL switch, which sets (XI) to -7. If program 
is relocatable, set (A) = relocation bias. 

Set the contents of register C to 02 03610. 

Set the RUN-IDLE-STEP switch to RUN. 

Note: To load the 925/930/9300 magnetic tape boot- 
strap, execute a magnetic tape FILL procedure. 
For 9300 computers, use appropriate channel la- 
bel (i.e., A, B, C, or D). 

CARDTAPE The CARDTAPE control message causes 

MONARCH to select the designated card reader, to 
read cards in symbolic, encoded, binary, MONARCH 
identification, and control message formats and to write 
them on the magnetic tape specified. 

ACARDTAPE P ] ,P 2 . 

P, must be a legal card reader designation on an exist- 
ing buffer; e.g., CR1W. This parameter specifies 
the card unit from which the cards are to be read. 

P must be a legal magnetic tape unit designation on 
an existing buffer; e.g., MT2W. This parameter 
specifies the tape unit on which the information is 
to be written. 

Cards are read from the card reader specified and are 
written on the designated magnetic tape. Binary, en- 
coded, MONARCH identification, and control cards 
are written in binary; all other cards are written in 
binary-coded decimal (BCD). When a AEOF card is 
read or a card reader end-of-file is detected, an end- 
of-file (EOF) mark is written on the magnetic tape, and 
control is returned to MONARCH. If successive files 
are to be written on tape, each file must be preceded by 
a CARDTAPE control message, including the necessary 
parameters. 



Example: 

The control message 

ACARDTAPE CR1W,MT3W. 

directs MONARCH to read cards from card reader 1 on 
the W buffer and to write them on magnetic tape unit 3 
on the W buffer. When the read is completed, an EOF 
mark will be written on the magnetic tape. 

EOF The EOF control message signifies the 

end of a logical file and transfers control to MONARCH. 

AEOF. 



There are no parameters for this message. It is recognized 
by the "action" routine that processes the CARDTAPE con- 
trol message (see Section 3 for explanation of action 
routines). The EOF message is also recognized by the 
FORTRAN and META -SYMBOL processors. 

SYSTEM MAINTENANCE 

UPDATE This control message causes MONARCH 

to load the System Update Routine and to transfer con- 
trol to it. 

AUPDATE Pj. 



'. (optional). When present, this parameter indicates 
blocking mode operation and must be within the 



range 



41 



10~ r l 



256 



10 



The absence of the parameter indicates normal mode 
operation. 

See Section 4 for a description of the update routine, its 
operating modes, and the control messages required for 
its use. 
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3. THE MONARCH SYSTEM 



MONITOR 



The major portion of the MONARCH system Is the moni- 
tor routine. This routine accepts control information 
which, among other things, may include a request to 
load and execute a specified standard system routine. 
The monitor performs its function between jobs and does 
not exercise control over the execution of a program 
once the program has been loaded and control has been 
transferred to it. 

The monitor consists of a number of subroutines. One of 
these subroutines is the system tape search routine. This 
is the subroutine that searches the system tape for a 
given routine name (see POSITION control message). 
Another monitor subroutine analyzes and interprets the 
contents of the control messages that convey control in- 
formation to the monitor. It also converts the param- 
eters in control messages to standard internal form. 

Other subroutines, called "action" subroutines, perform 
the functions associated with specific control messages. 
For example, the action subroutine associated with the 
ASSIGN message modifies the contents ofMONARCH's 
unit assignment table, based on the values of the param- 
eters in the ASSIGN message. Another action subroutine, 
associated with the LOAD message, controls the search- 
ing of tape files for specified object programs and calls 
on the MONARCH loader to load these object programs. 
Additional subroutines employed by the monitor include 
those which perform input/output for MONARCH. 

Part of the monitor, called the resident, remains in core 
memory during program execution. The resident consists 
of the monitor bootstrap routine (Q BOOT), the unit as- 
signment table, the error and job switches, the octal 
dump routine (QDUMP), and the symbol table dump driver 
(see Appendix B for a complete description of memory 
layout). The resident occupies the last 132o locations 
in memory. In RAD MONARCH, the resident also in- 
cludes a RAD file management routine of approximately 
500 memory locations, which handles all RAD I/O com- 
munications in a file-oriented manner. Memory space 
occupied by the remaining subroutines comprising the 
monitor and by other routines in the MONARCH system 
(such as the MONARCH loader) is available for use by 
the program being executed. The last available location 
in core is one cell below QDUMP (however, the term 
QDUMP-1 is illegal in META-SYMBOL language), or 
one below QBOOT for users who do not require the dump. 

STANDARD SYSTEM ROUTINES 

Standard system routines are those that exist on a MON- 
ARCH system tape and that can be loaded and executed 
by supplying an appropriate control message to the 
MONARCH monitor. Some existing system routines, as 
well as the necessary and desirable characteristics of 
potential system routines, are described below. 



Certain of the standard system routines must be present 
on any MONARCH system tape. These programs com- 
prise the minimum operable MONARCH system: 

1. The monitor. This routine is the heart of the opera- 
ting system. 

2. The MONARCH loader. The monitor uses this rou- 
tine to load standard system routines from the sys- 
tem tape and to load previously assembled programs 
presented by the MONARCH user. The MONARCH 
loader is described later in this section. 

3. The MONARCH bootstrap loader. This routine per- 
forms the function of loading the MONARCH loader 
and the MONARCH monitor and precedes all other 
system routines on a MONARCH system tape. This 
is the routine that is called in for execution by the 
monitor bootstrap (QBOOT). 

Certain system routines, while not essential for a mini- 
mum MONARCH system, enhance the usefulness and 
flexibility of any MONARCH system. 

1. The MONARCH system update routine. With this 
routine, the user can create new MONARCH system 
tapes or update existing system tapes. This routine 
is described in Section 4. 

2. The standard input/output subroutines. These sub- 
routines are used by other system routines to per- 
form required input/output functions. These I/O 
subroutines, which can be selectively loaded on an 
"as needed" basis, are 

Line Printer Output Subroutine (PRINT) 

Magnetic Tape Input/Output Subroutine (MTAPE) 

Card Read/Punch Subroutine (CDRP) 

Paper Tape/Typewriter Input/Output Subroutine 
(PTYIO) 

The action subroutines for a given system routine ex- 
amine the parameters of the control message and the 
unit address codes of those MONARCH unit assign- 
ment table entries that represent input/output func- 
tions to be performed and, finally, direct the loading 
of the I/O subroutines needed. The MONARCH up- 
date routine relies on this feature to provice the in- 
put/output subroutines needed to perform a specific 
update run. 

3. The META-SYMBOL assembly system. Presence of 

this routine provides a powerful and flexible assem- 
bly language and processor. 
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4. The FORTRAN II system. Presence of these routines 
enables the MONARCH user to use the full capa- 
bilities of the XDS 900 Series FORTRAN II Compiler, 
Loader, and Run-Time Package. 

5. The ALGOL system. This system, which is availa- 
ble on request, operates on both XDS 900 Series 
and the 9300 Computers. It includes the ALGOL 
Compiler, Loader, and Run-Time package. 

See "Automatic Selective Loading from the MONARCH 
Library" at the end of this section for a description of 
the MONARCH library, another optional MONARCH 
feature that can contribute greatly to the usefulness and 
efficiency of a MONARCH system. 

MONARCH is designed to facilitate the incorporation 
of additional system routines as needed. The user can 
include in a MONARCH system any routine that meets 
the following requirements: 

1„. The routine must exist (on cards or paper tape) in 
XDS standard binary language. 

2. Its memory space requirements must be such that it 
(or a special loader which precedes it on the system 
tape) can be loaded by the MONARCH loader. 

3. It must be written in a manner that is consistent 
with run termination as described in the paragraph, 
"Termination of a Run, " below. 

Certain other characteristics, while not essential, ease 
the job of incorporating new system routines and render 
these routines more useful in the MONARCH environ- 
ment: 

1. The routine should be one that can be assembled 
as a series of one or more relocatable programs by 
SYMBOL or META-SYMBOL. 

2. It should be written in such a way that any "param- 
eters" required for its initialization can be easily 
supplied in the form of MONARCH control message 
parameters (see "Control Message Parameters" in 
Section 2). 

3. The routine should be written to obtain unit and 
channel assignments for all its input/output func- 
tions from the MONARCH unit assignment table. 



TERMINATION OF A RUN 



When a program being executed under MONARCH de- 
tects a program or computer error that makes it inadvis- 
able to continue program execution, it should give what- 
ever error indication is suitable and transfer control to 
the monitor bootstrap. This routine initiates the reload- 
ing of the MONARCH loader and MONARCH monitor, 
and then the console operator can decide whether or not 
to continue with the next job or function in a batched 
job stack or to take some alternative action. 

When the console operator decides that a program being 
executed has halted inadvertently or is otherwise mal- 
functioning, he can stop the program, clear the registers 
and restart by manually transferring control to a restart 
location in the monitor bootstrap. The monitor bootstrap 
initiates the reloading of the system, and then the moni- 
tor attempts to obtain the next control message. At this 
point, the operator can decide whetheror not to continue 
with the next job in the batched job stack or to execute 
some other system function. 

The normal restart procedure is to execute a branch to 
location 1. Location 1 normally contains an uncondi- 
tional branch to the monitor bootstrap in upper memory. 
The routine that is loaded by the monitor bootstrap is 
the MONARCH bootstrap loader, which precedes all 
other routines on the system tape. The MONARCH boot- 
strap loader in turn loads the MONARCH loader and the 
MONARCH monitor. 

LOADER 

The primary function of this routine is to load the user's 
object programs. It is also called upon by the MONARCH 
monitor to load from the system tape standard system 
routines such as META-SYMBOL, the system update rou- 
tine, etc. The loader (including QDUMP, QBOOT, 
and UAT) occupies upper core. 



The loader is capable of loading binary object programs 
in the format produced by SYMBOL and META-SYMBOL. 
A series of programs to be loaded may be absolute or re- 
locatable and may contain: 

1. External label references and/or definitions. 

2. External Programmed Operator (POP) references 
ana/or definitions . 

3. Blank COMMON references and a definition. 



When a program being executed under MONARCH 
reaches a normal conclusion, it should transfer control 
to the monitor bootstrap in core memory (location 1) 
rather than execute a HALT instruction; the monitor 
bootstrap initiates the reloading of the MONARCH loader 
and the MONARCH monitor. The monitor then attempts 
to read a new control message from the current control 
medium and in this way proceeds to the next job with- 
out the necessity for manual intervention. The monitor 
bootstrap is part of the MONARCH resident. 



Blank COMMON references should be preceded by a 
blank COMMON definition, but external references 



The capability of handling POP items is not included 
in 9300 MONARCH loader since the 9300 does not have 
Programmed Operators. All other capabilities of the 
900 Series MONARCH loader are included in 9300 
MONARCH loader. 
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and definitions (label or POP) need not be supplied in 
any particular order. 

The term "program" in this description of the MONARCH 
loader means a sequence of: 

1. One or more data records (record type 0) and/or 

2. One or more external references or definition re- 
cords (record type 1) and /or 

3. One or more Programmed Operator references or 
definition records (record type 2) and 

4. An end record (record type 3) with or without a 
transfer address. 



See Appendix F, "XDS Standard Binary Language, " for 
a description of the record formats accepted by this load- 
er. Note that the MONARCH loader does not accept 
labeled COMMON definitions or references (record 
type 2, item types 1 and 3) and treats labeled COMMON 
references as format errors. 

The last (or only) program in a series of programs to be 
loaded must have an end record (type 3) with a trans- 
fer address, and all programs preceding it must have 
end records without transfer addresses. 

If there are unsatisfied label or POP references at the 
time the end record with a transfer address is encoun- 
tered, the loader attempts to satisfy theseby selectively 
loading the appropriate subroutines from the MONARCH 
library. If this is unsuccessful, the loader automatically 
outputs (on typewriter 1 on the W buffer if Breakpoint 1 
is reset or on line printer 1 on the W buffer if Break- 
point 1 is set) the unsatisfied labels or POP references. 
Following this information, the loader outputs the sym- 
bol table if requested to do so (see LOAD control message 
in Section 2). Then the computer halts. After determin- 
ing whether the missing definitions will affect the run, 
the user may elect to execute the program by simply 
clearing the halt (i. e. , move theRUN-IDLE-STEPswitch 
from RUN to IDLE to RUN) or to abort the run by trans- 
ferring manually to the bootstrap (i. e. , to location 1). 

Programs may be loaded from punched card, magnetic 
tape, or paper tape units attached to either the W or Y 
buffer. In RAD MONARCH, programs may a I so be loaded 
from RAD files. The input/output subroutines within the 
900 Series MONARCH loader use neither interrupts nor 
interlace. The 9300 I/O handlers use interlace and 
interrupts for all I/O operations. Any I/O operation 
performed by 9300 MONARCH that does not use the 
I/O handlers does not use interrupts. Reading and search- 
ing of the binary input medium by the 9300 MONARCH 
loader uses interlace but not interrupts. The symbol 
table typeout routine, the line printer octal dump routine, 
and the punching of the absolute bootstrap on paper tape 
do not use interrupts or interlace. 



UNIT ASSIGNMENT REQUIREMENTS 

When a LOAD control message (see Section 2 for a de- 
tailed description of this message) is issued to MONARCH, 
the unit assignment table is assumed to contain the fol- 
lowing information: 



1. QMSG contains the unit and channel designation 
for the peripheral device that is to furnish MON- 
ARCH control messages. (QMSG is set by the C 
control message. ) 

2. QBINI contains the unit and channel designation 
for the peripheral device that is to furnish input 
(programs) to the loader. The unit must be a card 
reader, a magnetic tape unit, a paper tape reader, 
or the RAD file. 

The following sequence of MONARCH control messages 
illustrates one means of setting the unit assignment table 
and requesting the MONARCH loader to load one or 
more programs: 

AC TY1W. 
AASSIGN BI=CR1W. 
AENDJOB. 
ALOAD 010000, GO. 

The control messages are to be input from typewriter 1 
on the W buffer, and the binary input is to be read from 
card reader 1 on the W buffer. The loader is to load the 
first (or only) program with a relocation bias of lOOOOg 
and is to transfer control to the location specified on the 
END record of the last program without stopping and 
without a symbol table printout. If any references are 
unsatisfied, a list of the unsatisfied references is typed 
on typewriter 1 on the W buffer. Then the loader halts. 
To continue, the operator clears the halt. 

STORAGE ALLOCATION 

When the MONARCH system is loaded, the MONARCH 
loader is stored in upper core, occupying locationsX5441g 
through X7777g(X = l, 2, or 3). The locder'ssymbol table 
(external label definition entries) initially occupies mem- 
ory from X5440 8 ft through X5276 8 n . As each additional 
external symbol is inserted in the symbol table, it occu- 
pies the three memory locations immediately below the 
last symbol table entry. Thus, the loader and its symbol 
table occupy that amount of upper core required by the 
loader routine itself and the external symbol entries. 

At the time a request to load a user's program is initiated, 
the loader symbol table contains external table defini- 
tion entries that allow external references to locations 



The external labels mentioned here are discussed inAp- 
pendix A, "The MONARCH Unit Assignment Table". 

"Approximately lOOOg less in RAD MONARCH 
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within the resident portion of MONARCH. Those en- 
tries are defined in Appendix A. 

The loader gives an appropriate error indication when- 
ever a new entry is to be made in the symbol table that 
would "overlay" programs or data already stored in 
memory by the loader. This conditions is also referred 
to as symbol table overflow. See Section 6 "Operating 
Procedures. " 

THE LOADING PROCESS 



Relocation and Data Records 

A data record (record type 0) contains instructions and/ 
or data to be stored in memory by the loader. Each data 
record contains a load address that is either the relative 
or absolute memory location in which the first data word 
(an instruction or a constant) is to be stored. The word 
in the data record containing the load address also con- 
tains an indicator specifying whether or not the current 
load relocation bias is to be added to this load address 
to obtain an effective load address (i.e., whether or 
not the data record contains "relocatable" data words) 
for the program. 

The effective load address determines the location in 
which the first data word is stored, and successive data 
words in a data record are stored inconsecutive memory 
locations following the first data word. 

Before each data word in a program is stored its binary 
value may be modified as required (e.g., by load re- 
location modifier word; see Appendix F "XDS Standard 
Binary Language. ") 

External Label References and Definitions 

The loader is capable of handling (resolving) symbolic 
cross-references between separately assembled and/or 
compiled programs. External reference and definition 
items in type 1 binary records provide the loader with 
the information needed to "link" together two or more 
separately assembled or compiled programs. 

During the loading process, the loader maintains a sym- 
bol table of external label definitions and unsatisfied 
external references. There is no restriction on the order 
in which the definition of a label and the references to 
it appear in the input to the loader. The definition of 
a label may precede, or follow, some or all of the ref- 
erences to it. Note that it is permissible for any number 
of programs to contain references to a given label, pro- 
vided that one program being loaded contains an exter- 
nal definition item for that label. 

When the loader encounters an external definition item, 
it searches the symbol table for a previous definition of 
that label in the tabie; if there is one, the ioader dis- 
cards the new definition. If the search reveals that the 



label is already in the table as an unsatisfied reference, 
the loader uses the definition to satisfy all the references 
to that label and replaces the unsatisfied reference item 
in the table with the definition item. However, if that 
label does not occur in the symbol table (as a reference 
or as a definition), the loader inserts the external defin- 
ition item in the symbol table. 

When the loader encounters an external reference item, 
it searches the symbol table to see if it already contains 
an external reference item for that label; if so, the new 
external reference is associated with the existing table 
entry. If the search reveals that the label is already in- 
cluded in the table as an external definition the loader 
uses the definition to satisfy all the references to that 
label. However, if that label does not occur in the 
symbol table (as a reference or as a definition), the ex- 
ternal reference item is inserted in the symbol table. 

External Programmed Operator References and Definitions 

The loader is capable of satisfying references to internal 
and external Programmed Operator (POP) definitions. 
External POP definition items, external reference items, 
and internal POP definition items provide the loader 
with the information needed to: 

1. Satisfy external and internal POP references. 

2. Maintain external POP reference and definition 
items in the loader's symbol table. 

3. Construct a Programmed Operator transfer table in 
cells OlOOg through 01778. 

An "internal" POP definition is one that is recognized 
only within the scope of the program in which it occurs. 
No entries are made in the loader's symbol table for in- 
ternal POP definitions or references. 

Many of the loader functions performed in the process- 
ing of external POP references and definitions are also 
performed (by the same loader subroutines) for external 
label references and definitions. In particular, the 
functions of insertion and replacement of symbol table 
entries and the handling of duplicate definitions are the 
same for both external label and external POP items. 

AUTOMATIC SELECTIVE LOADING 
FROM THE MONARCH LIBRARY 

Provision is made for automatic search of the MONARCH 
library when an end record with a transfer address is en- 
countered and unsatisfied label or POP references exist. 
This library normally consists of a collection of frequent- 
ly used closed subroutines and Programmed Operator sub- 
routines. The loader automatically loads any such 
subroutines when it encounters an external reference in 
a program (or group of programs) being loaded. This 
relieves the programmer of the burden of including such 
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subroutines in the program decks (or tapes) he furnishes 
to the loader. For example, the programmer may wish 
to employ certain input/output subroutines available on 
the program library and refer to them symbolically in 
his main program. Note that the loader first attempts 
to satisfy all external references from the definitions 
supplied in the program decks (or tapes) furnished by 
the programmer, and only when this attempt is unsuc- 
cessful does it attempt to satisfy these references by 
loading programs from the program library. The follow- 
ing paragraphs describe the procedures employed to ac- 
cess programs in the program library. 

When the loader is loading a previously assembled pro- 
gram and there are external references that have not 
been satisfied when the end record with a transfer ad- 
dress is encountered, the loader causes the monitor to 
locate the MONARCH library on the system tape. The 
loader then enters a special mode in which it searches 
the external definition in each library program in suc- 
cession. When it encounters a library program which 
satisfies at least one such reference, it loads this pro- 
gram; then, if there are still some unsatisfied references, 
it continues to search the program library. To avoid 
"backtracking" when switching from "search" to "load" 
mode, the definitions from each library program being 
examined are temporarily added to the table of exter- 



nal definitions and references maintained by the loader. 
Note that the records containing external label defini- 
tions and external Programmed Operator definitions must 
precede all other information in a binary object program; 
hence, only these definitions have to be saved in mem- 
ory to enable the loader to switch from "search" to "load" 
mode without rereading records from the system tape. 

If a given library program does not contain a definition 
for any of the unsatisfied references, its definitions are 
removed from the table and the next library program is 
examined. If there are still unsatisfied external refer- 
ences when the end of the program library is encountered, 
the loader indicates that an error condition exists. 



The loader employs an entirely similar method in attempt- 
ing to obtain definitions for any unsatisfied Programmed 
Operator references. If these references cannot be satis- 
fied from the Programmed Operator definitions on the 
system tape, the loader indicates that an error condition 
exists. The library search for Programmed Operators is 
concurrent with the search for external definitions of 
labels (i.e., the Programmed Operator definitions are 
part of the program library). Since MONARCH makes 
only one pass through the library, no routine on the li- 
brary can call a routine preceding it. 
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4. PROGRAMMING WITH MONARCH 



This section describes MONARCH subroutines that can 
be referenced from the user's program. Also discussed 
here is the MONARCH System Update Routine which is 
used to create new MONARCH system tapes and to up- 
date existing system tapes. 

OCTAL DUMP ROUTINE 

A Line Printer Octal Dump Routinewith zero suppression is 
incorporated in the MONARCH loader. This routine re- 
sides in the MONARCH resident portion and may be refer- 
enced internally or from the console. When thedump rou- 
tine is tobe referenced ina program, thefollowingcalling 
sequence must be assembled as part of the user's program: 

QDUMP 
P l 



a 


BRM 


a+ 1 


PZE 


a + 2 


PZE 


a + 3 


retu rn 



a represents any location. When thedump is completed, 
control is returned to the user's program at a + 3. 

QDUMP is the externally defined label for the entry 
point of the routine and must be an externally de- 
fined symbol in the user's program. 

P. specifies the beginning address of the sequential 
memory locations whose contents are to be printed. 

P« designates the ending address of the sequential mem- 
ory locations whose contents are to be printed. The 
address represented by P~ must be equal to or greater 
than that of Pj. 

P 1 and P« may be numeric or symbolic (external). 

To reference the dump routine from the console, set the 
contents of the registers as follows: 

A = Beginning address (see P] above) 
B = Ending address (see ?2 above) 
C = For 900 Series Computers: 



RAD 



01 1 775 1 8 

01 23751 8 



01 27751 



8 



01 33751 8 
01 37751 8 



8K memory 
10K memory 
12K memory 
14K memory 
16K memory 



For 9300 Computers: 



TAPE 

01 17650 
01 23650 
01 27650 
01 33650 
01 37650 



TAPE 



8K memory 01 17646 
12K memory 01 27646 
16K memory 01 37646 

Position the RUN-IDLE-STEP switch to RUN. 



To continuedumping when the computer halts, reset the A 
and B registers to the desired addresses and clear the halt. 

Note: On 900 Series Computers the octal dump routine op- 
erates only on machines with memory of 16K or less. 

SYMBOL TABLE TYPE0UT ROUTINE 

The Symbol Table Typeout Routine produces a list of all 
symbols and the location to which each is assigned. If 
Breakpoint 1 is reset, the symbol table is output on type- 
writer 1 on the W buffer; if Breakpoint 1 is set, the table 
is output on line printer 1 on the W buffer. 

To reference the symbol table typeout routine, set the 
contents of the 900/9300 C register to BRU TYPSY5: 



RAD 



TAPE 



C = 01 17750 8 
= 01 23750 



= 01 27750 
= 01 33750! 
= 01 37750! 



8K memory 01 17734 

10K memory 01 23734 

12K memory 01 27734 

14K memory 01 33734 

16K memory 01 37734 

Position the RUN-IDLE-STEP switch to RUN. The com- 
puter will halt after the typeout. The user may clear 
the halt, causing a transfer to QBOOT which reloads 
the MONARCH system, or he may transfer manually to 
any location (i.e., insert in the C register a BRU to the 
desired location). 

The output produced by this routine consists of two columns; 
the first contains the symbol, left justified with trailing 
blanks, and the second contains the memory location to 
which the symbol was assigned. (See Appendix C for 
the method used in forming the addresses.) 

It Is suggested that, upon receiving the MONARCH 
system of programs, the user have a symbol table type- 
out produced. The listing produced will be useful when 
reference to a specific address within the MONARCH 
system of programs is required. A sample of such a 
listing appears in the discussion "Monarch Loader's 
Symbol Table" in Section 6. 

OCTAL CORRECTION ROUTINE 

Corrections may be made to a program at load time via 
octal correction cards. Such cards are placed just be- 
fore the end card in the binary deck. The format of 
correction cards is 

P l P 2 P 3-'- P n- 

P. is an address, consisting of up to five octal digits, 
that specifies the location of the first correction. 
Pi may start in any column. If it does not start in 
column 1, a character string (Po) may precede P]. 
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P is any character string (one or more characters) not 
containing an octal digit. If the first character of 
the string is an R, the preceding octal number is 
assumed to be relocatable. If the first character 
is any other character, the preceding octal number 
is assumed to be nonrelocatable. 

P_ is the octal correction (one ormoreoctal digits). If 
more than eight digits appear, only the last eight 
digits read (i.e., the eight low-order digits) are 
accepted. 

Succeeding octal numbers are stored in consecutive lo- 
cations relative to location P], Continuation from one 
card to the next is not permitted. A period may serve 
as a terminator but is not required. If a period is used, 
any information following the period is treated as com- 
ments and is not processed. 

Examples: 

Assume that a program is to be loaded and that relative 
locations 212, 213, and 214 are to be changed to con- 
tain BRU 00235, BRU 00243, and HLT 00000, respective- 
ly. The necessary corrections could be written as 



,21 2R 1 000235 R1000243RQ. 

1 1 y i — y i v 



P i ' P r> 
1 p 3 

2 



Po ' Po 

P 2 3 P 2 3 



The same changes could also be written as 



PATCH, 21 2,R = 1000235.R, .1000243R, ZRO = 0. 
P„ P, P« P. P~ Po P« P. 



If the program is loaded with a relocation bias of IOOOq, 
these locations will contain: 



Location 

1212 
1213 
1214 



Contents 

01000235 
01000243 
00000000 



LOADER ROUTINE 

The MONARCH loader can be executed either via the 
appropriate MONARCH control messages or directly as 
a closed subroutine. The user's program can transfer to 
the loader by executing the instruction 

BRM QSYLDR 

QSYLDR is the externally defined label for the entry 
point to the loader and must be an externally defined 
symbol in the user's program. The loader assumes that 



the A register contains the load relocation bias to be 
used and that the B register contains the binary value of 
the loader option parameter (see LOAD control message 
in Section 2). 

The loader commences execution by reading a record 
from the previously designated binary input medium and 
checking the first word (control word) of the record to 
see whether or not it is a valid binary record. Next, 
the record type code (see Appendix F) of the control 
word is used to indicate the appropriate subroutine with- 
in the loader for processing that type of record. 

When the loader has processed a record, it continues by 
reading in the next record unless the record just process- 
ed is an end record (record type code of 3). When an 
end record without a transfer address has been processed, 
the loader, depending upon the value of the loader op- 
tion parameter, does one of three things: 

1. Halts with: 

C = 20 22222 

A = load relocation bias to be used for loading the 
next program (unless changed manually by the 
console operator) 

B = indeterminate 

2. Returns control to the program that called the load- 
er (by executing a BRR QSYLDR), with: 

B = initial load relocation bias plus program length 

A = loader option parameter 

3. Sets the load relocation bias equal to its previous 
value plus the length of the current program (as 
specified in the end record) and continues loading 
records. 

When an end record with a transfer address is encount- 
ered, a library search is made to satisfy references. Then 
any indicated relocation is performed on the single data 
word in the end record, and the loader, depending on 
the value of the loader option parameter, does one of 
two things: 

1. Halts with: 

C = transfer word as modified by any relocation 
indicative present in the end record 

A = loader option parameter 

B = load relocation bias 

2. Executes the transfer word after performing any in- 
dicated relocation of the address field. Normally, 
the transfer word is a BRANCH UNCONDITIONAL 
instruction (BRU), whose address is determined by 
the value of the expression in the operand field of 
a SYMBOL or META-SYMBOL END line. 
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The loader does not "initialize" unused memory loca- 
tions with "background" values (e.g., halt instruction). 
The only memory locations modified by the loader are 

1. Those within the locations occupied by the loader 
and its input subroutines. 

2. Those locations pre-empted by the loader for its 
symbol table. 

3. Locations in which the loader is explicitly directed 
to store instructions or constants (i.e., data words 
supplied to the loader in data records). 

SYSTEM UPDATE ROUTINE 

This routine is used to create new MONARCH system 
tapes and to update existing system tapes. The func- 
tions of insertion and deletion of both system programs 
and data files (including the MONARCH monitor and 
the MONARCH loader) are provided. 

Since each routine on the system tape (except the boot- 
strap loader and the MONARCH loader) is preceded by 
an identifier (a MONARCH ID record), insertions and 
deletions are indicated to the update routine in terms 
of those identifiers. The MONARCH loader has the 
identifier LOAD associated with it even though no 
MONARCH ID record actually precedes that routine on 
the system tape. The bootstrap loader is automatically re- 
corded on a new system tape as the first record on the tape. 

It may be necessary to include, as standard system rou- 
tines, programs whose memory space requirements pre- 
clude the use of the MONARCH loader to load them at 
execution time. Such programs should be preceded on 
the system tape by a special purpose loader that is capa- 
ble of loading the system routine in question from the 
system tape. It is this special purpose loader which is 
loaded, and executed, under control of the MONARCH 
loader when a MONARCH control message calls for ex- 
ecution of the system routine in question. 

All programs on a MONARCH system tape, with the ex- 
ception of the bootstrap loader, must be in either XDS 
standard binary language or FORTRAN binary language. 
Data files to be recorded on a MONARCH system tape 
must be presented to the update routine in either of these 
formats or else in XDS encoded symbolic format. The 
only other form of information permissible on a MON- 
ARCH system tape is MONARCH ID records. Such rou- 
tines and data files must be presented to the update 
routine on punched cards, paper tape, or magnetic tape. 



MONARCH ID record. Hence, the MONARCH loader 
automatically loads any subprograms following the first 
subprogram until it encounters either the next level 1 
MONARCH ID record or a binary end record (type 3) 
with a transfer address. The MONARCH update routine 
acknowledges this type of program structure when per- 
forming insertion and deletion functions in the course of 
writing a new system tape. Any or all of the subpro- 
grams of a standard system routine may be preceded on 
the system tape by a level 2 MONARCH ID record to 
permit insertion or deletion of individual subprograms 
by the MONARCH update routine. These level 2 MON- 
ARCH ID records are ignored by the MONARCH loader 
when loading a standard system routine for execution. 

The update routine produces a typewriter or line printer 
listing of the MONARCH ID records (level 1 and level 
2) associated with all routines and all data files written 
on a new system tape. These ID records appear on the 
listing in the order in which they exist on the new sys- 
tem tape. This listing should be preserved for use as the 
basis for constructing update control messages for the 
next system update run. (See examples later in this sec- 
tion. ) 

Routines to be inserted by the MONARCH update rou- 
tine must be preceded by a level 1 and/or level 2 
MONARCH ID record and must be presented in the order 
in which they appear on the new system tape. COPY 
messages (i.e., control messages to the update routine) 
must be presented in the order in which they are to be 
executed. No reordering of update input is performed. 



THE UPDATE CONTROL MESSAGE 



When the update routine is loaded for execution by the 
MONARCH loader, the MONARCH unit assignment 
table is assumed to contain the following information: 

1. QMSG (control message input unit) contains the 
unit and channel designation for the peripheral de- 
vice that is to furnish MONARCH control messages 
and update control messages. The unit must be a 
card reader or a typewriter. 

2. QSYSU (the update input unit UI) contains the unit 
and channel designation for the peripheral device 
that is to furnish any programs or data files to be 
inserted in the new system. The unit must be a card 
reader, a paper tape reader, or a magnetic tape 
unit. 



It is also noted that a standard system routine (e.g., the 
META-SYMBOL assembler) may itseif consist of several 
independently assembled subprograms and only the first 
of these is preceded on the system tape by a level 1 



3. QSYST (system scratch tape XI) contains the unit 
(magnetic tape oniy) and channel designation for 
the peripheral device upon which the new system 
tape will be written. 
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4. QSYS (sytem tape S) is assumed to specify magne- 
tic tape unit on channel W and the old system 
tape is assumed to be mounted on that unit. How- 
ever, if both QSYS and QSYST contain the same 
unit and channel designation, the update routine 
assumes that no old system tape is present. 

5. QSYMO (list output unit LO) is assumed to specify 
whether MONARCH ID records will be listed on 
the line printer (LO=LP)oron the typewriter (LO=TY). 

It should be noted that the update control message input 
unit (QMSG) and update input unit (UI) assignments may 
differ. For example, QMSG may be assigned to the 
card reader (CR) and update input (UI) may be assigned 
to a paper tape, magnetic tape, or card reader. 

The following sequence of MONARCH control messages 
illustrates the means of setting up the unit assignment 
table and calling in the update routine for execution. 

AC CR1W. 

AASSIGN S=MT0W, X1=MT1W, UI=CR1W. 

AASSIGN LO=LP. 

AUPDATE 256. 

The MONARCH update routine has two modes of oper- 
ation: the normal mode and the blocking mode. In the 
normal mode all records are written as 40-word records. 
In the blocking modeall records (MONARCH ID records 
excluded) are written as blocked records. The maximum 
length of a blocked record is determined by the block- 
ing number which is a parameter of the update control 
message (41 ]q < blocking number < 256] q). If the block- 
ing number is less than 41, 41 is automatically used. If 
the blocking number is greater than 256, 256 is automa- 
tically used. 

A blocked record consists of a 1-word block sentinel 
(defined below) followed by one or more "logical" re- 
cords. A "logical" record is one of the following: 

1. A MONARCH ID record (40 words). 

2. A binary record (average length fewer than 28 
words, maximum length 31 words). 

3. An encoded symbolic record (40 words maximum). 

An unblocked record consists of a single logical record; 
however, all unblocked records are written as 40-word 
records even if the logical record contains fewer than 
40 words. 

The block sentinel word has the following format: 

Bits Contents 

0-8 

9-11 3 

12-23 Number of words in physical record 

(including the block sentinel word) 



The blocking number serves a twofold purpose: it spec- 
ifies the maximum number of words per record and indi- 
cates whether the update routine is to operate in the 
blocking mode on the selected segments. If no blocking 
factor is specified, the update routine operates on all 
segments in the normal mode. 

Which segments are to be blocked when the update rou- 
tine is operating in the blocking mode is determined by 
the level 1 or level 2 MONARCH ID record preceding 
that segment. If a level 1 or level 2 MONARCH ID 
record contains a B in character position 22 and blanks 
in character positions 21, 23, and 24, everything with- 
in the scope of that level 1 or level 2 ID record is block- 
ed. Since the MONARCH loader is not preceded by a 
MONARCH ID record, it is automatically blocked when- 
ever a blocking mode is specified. 

CONTROLLING AN UPDATE RUN- 
THE UPDATE FILE 

Normally, two logical "files" are presented to the up- 
date routine to enable it to create a new system tape. 
One of these files is the old system tape, and it is an 
optional input. The other file is the update file; it is 
never optional, although its form and content may vary 
considerably. 

In the general case, the update file consists of an or- 
dered sequence of COPY messages, MONARCH ID re- 
cords, binary records, and encoded symbolic records. 
In a particular instance, an update file may consist en- 
tirely of COPY messages, in which case only the func- 
tions of selective duplicating and selective deleting are 
performed. Alternatively, a given update file may con- 
sist entirely of MONARCH ID records, binary records, 
and encoded records, in which case only the functions 
of selective insertion and, by the absence of COPY mes- 
sages, blanket deletion of all information on the old 
system tape are performed. In the latter case, the ab- 
sence of COPY messages removes the requirement for 
providing an old system tape for the update run. 

Physically, the update file can exist entirely on magne- 
tic tape, on punched cards, or (although highly unlikely) 
entirely on paper tape. Alternatively, all COPY mes- 
sages and MONARCH ID records in the update file can 
be presented as typewriter messages while any programs 
to be inserted are presented on punched cards, paper 
tape, or magnetic tape. (Samples of update file listings 
are included at the end of this section.) 

Insertion 

Insertion is controlled by presenting the update routine 
with a MONARCH ID record via the control message 
medium (QMSG) which may also be the update medium 
(QSYSU), and one or more programs (or data files) via 
the update medium (QSYSU). The MONARCH ID record 
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is the first record written on the new system tape. The 
update routine then copies records from the update me- 
dium onto the new system tape until: 

1. An end-of-file condition (not AEOF) is detected. 
The update routine will then request a control 
message. 

2. A possible COPY message is encountered; i.e., a 
record other than a binary, encoded, or MONARCH 
ID record. (The update routine proceeds to analyze 
it as if it were a control message. ) 

3. If the update medium is paper tape and a binary or 
encoded end record (type 3) is encountered, a halt 
is executed. (Set (A) = to continue insertion, or 
set (A) / to stop insertion and cause the update 
routine to request a control message next; then set 
the RUN-IDLE-STEP switch to RUN.) 

4. A level 1 MONARCH ID record with SYSEND AA 
in characters 9 through 16 was written on the new 
system tape. (Both old and new system tapes are 
rewound, and the monitor is loaded from the system 
tape on unit of the W buffer. ) 

Note: When an insertion is under control of a level 2 

MONARCH ID record and the insertion is to be- 
come, or replace, the first subdivision of a major 

ui vi jiwii v I 111^ .?Voiv~iM iu»JCf 111C iCvCi l 

MONARCH ID record for the major division 
must precede the level 2 MONARCH ID record 
in the update file. (See examples at the end of 
this section. ) 

Programs to be inserted must be in XDS standard binary 
language. Data files must be in this format or else in 
XDS 9300/900 Series encoded symbolic format. 

All binary and encoded records inserted in a new system 
tape will have their checksums validated by the update 
routine. 

Deletion 

Deletion of programs or data files from an old system 
tape is accomplished by simply excluding those programs 
or data files from the scope of a COPY message. In 
other words, failure to COPY a program results in its 
being deleted from the new system tape. 

Replacement 

Replacement of programs or data files is accomplished 
by deleting (not COPYing) the existing program or file 
and by inserting a new version of that program or file. 

Retention (COPY function) 



COPY message. Retention must be made explicit; the 
only program implicitly "retained" from an old system 
tape to a new system tape is the bootstrap loader, but 
this program is not "copied" from the old tape by dupli- 
cating the first record on the old tape. It is in core at 
the time the update routine is executed; therefore, the 
update routine writes the bootstrap loader from core onto 
tape as its first operation (i.e., immediately after con- 
trol is transferred to it and before any COPY messages 
are read). All binary and encoded records written on 
the new system tape will have their checksums validated 
by the update routine. 

COPY MESSAGES 

The purpose of a COPY message is to obtain programs or 
data files from the old system tape and record them on 
the new system tape. The COPY message is used in lieu 
of placing the indicated programs in the update file. 
COPY messages refer to records (e.g., binary programs) 
by using the program names that appear in character po- 
sitions 9 through 16 of the MONARCH ID records on the 
old system tape. 

Major divisions of a MONARCH system are preceded, 
" the system tape, by a level 1 MONARCH ID record: 



on 



iiiuii ui |*ri wyi i4i mo ci t-iuiu i i igo 






including those programs or data files in the scope of a 



Al^^LIBRARY, 



Minor divisions of a MONARCH system are preceded, 
on the system tape, by a level 2 MONARCH ID record: 

A2 aaaaaaCOSINE aa . • • 

AAAAAA AA 

Minor divisions of a MONARCH system are arbitrary 
subdivisions of a program or a data file recognized by 
the update routine (see description of the MONARCH 
Loader in Section 3 for mention of another use of level 2 
MONARCH ID records in connection with automatic li- 
brary searching). 

Each MONARCH ID record must have a unique label. 
Labels may not contain separators (see Section 2). In 
other words, each label must be explicit; a label such as 

A1 aa SIN,COS A ... 

AAAAAA ' A 

is illegal because of the comma. 

If an argument of a COPY message consists of one 
program name, the name is assumed to occur in charac- 
ters 9 through 16 of a level 1 MONARCH ID record on 
the old system tape. If an argument of a COPY message 
consists of two program names (the second may be en- 
closed in parentheses), the first (leftmost) is assumed to 
occur in characters 9 through 16 of a level 1 MONARCH 
ID record on the old system tape, while the second pro- 
gram name is assumeu to occur in cnaracters 7 tnrougn 
16 of a level 2 MONARCH ID record which occurs 
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subsequent to the level 1 record. In other words, the 
second program name is assumed to refer to a subdivision 
of the major divisionof theold system tapethatwas iden- 
tified by the first program name. For example, 

A AAA COPY LIBRARY (COSINE). 

LIBRARY is a level 1 ID record, and COSINE is a level 
2 ID record within the scope of LIBRARY. 

Execution of a COPY message by the MONARCH up- 
date routine involves copying the MONARCH ID re- 
cord (s) and any binary or encoded records that are in 
the scope of the MONARCH ID records named in the 
COPY message. 

The term "in the scope of" is defined as follows: 

If "A" and "B" are distinct program names in level 
1 ID records, and "X" and "Y" are distinct pro- 
gram names in level 2 ID records, then: 

1. A binary or encoded record (r) is "in the 
scope of" A provided that no other level 1 ID 
record occurs between A and r on the system tape. 

2. A binary or encoded record (r) is "in the scope 
of" X provided that no other level 2 ID record 
occurs between X and r on the system tape. 

3. X is "in the scope of" A provided that no other 
level 1 ID record occurs between A and X on 
the system tape. 

4. A binary or encoded record (r) is "in the scope 
of" both X and A if rules 1, 2, and 3 apply. 

5. If a binary or encoded record (r) is "in the 
scope of" X, it is not "in the scope of" Y. 

6. If a binary or encoded record (r) is "in the 
scope of" A, it is not "in the scope of" B. 

The Syntax of COPY Messages 

A valid COPY message is an instance of one of the 
following: 

A A COPY a. 

AAA A 

A AAA COPY A a A (b). 

AAA A A v ' 

A AAA COPY A a A THRU A b. 

AAA A A A 

A AAA COPY A a A (c) A THRU A b. 

AAA A A x 7 A A 

A AAA COPY A a A THRU A b A (d). 

AAA A A A A v ' 

A A A A COPY A a A (c) THRU A b A (d). 

AAA A A x 'A A A v ' 



where a, b, c, and d represent program names (MONARCH 
ID labels). The first character of a program name must 
be alphabetic and each remaining character must be 
either alphabetic or numeric. Each name may consist 
of up to eight characters. The message must be termi- 
nated by a period. 



Parentheses may be omitted, their only purpose being to 
enhance readability. 

The caret (a) is used to indicate the minimum number of 
spaces that must separate words in a COPY message. 

COPY messages without the word THRU are said to have 
one argument. COPY messages with the word THRU are 
said to contain two arguments. Each argument consists 
of either one or two program names. 

COPY Messages with One Argument 

A COPY message with one argument consisting of one 
program name causes the update routine to read all re- 
cords in the scope of the level 1 ID record with the same 
name from the old system tape and write them on the new 
system tape. For example, when 

A AAA COPY A LIBRARY. 

AAA A 

is encountered, the update routine bypasses any records 
on the old system tape preceding the level 1 MONARCH 
ID record with LIBRARY^ in characters 9 through 16. 
This is the first record to be written on the new system 
tape in response to this COPY message. The update rou- 
tine then copies all records following that ID record un- 
til the next level 1 MONARCH ID record is encountered 
on the old system tape. It is this "next" level 1 record 
that terminates the copying of records from the old sys- 
tem tape; it is not copied onto the new system tape as a 
result of this COPY message, but it is the first "old sys- 
tem tape" record to be examined when the next update 
control message is processed. 

A COPY message with one argument consisting of two 
program names causes the update routine to read all re- 
cords in the scope of the level 2 MONARCH ID record 
corresponding to the second program name and write them 
on the new system tape. For example, when 

A AAA COPY A LIBRARY A (COSINE). 

is encountered, the update routine bypasses any records 
on theold system tape preceding the level 1 MONARCH 
ID record with LIBRARYa 'n characters 9 through 16; 
that is, unless the old system tape is already positioned 
at, or beyond (but still within the scope of), that level 
1 ID record. In either case, the update routine searches, 
within the scope of LIBRARY, for a level 2 MONARCH 
ID record with COSINEaa ' n characters 9 through 16. 
If the level 1 MONARCH ID record for LIBRARY has not 
already been written on the new system tape, it is the 
first record written on the new system tape in response 
to this COPY message. In either case the update rou- 
tine writes, on the new system tape, the level 2 MON- 
ARCH ID record with the name COSINE. The update 
routine then copies all records following that ID record 
until the next MONARCH ID record (either level 1 or 
level 2) is encountered on the old system tape. It is 
this "next" MONARCH ID record that terminates the 
copying of records from the old system tape. It is not 
copied onto the new system tape as a result of this COPY 
message, but it is the first "old system tape" record 
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to be examined when the next update control message 
is processed. 

COPY Messages with Two Arguments 

A COPY message with two arguments is equivalent to a 
series of "one argument" COPY messages. The update 
routine performs the necessary copying indicated by the 
first argument exactly as in the case of a 1 -argument 
COPY message; but, in addition, it copies all records 
following those included in the scope of the first argu- 
ment until the MONARCH ID record whose name matches 
the second (or only) program name of the second argu- 
ment is encountered. At this point, the update routine 
performs the necessary copying indicated by the second 
argument exactly as in the case of a 1 -argument COPY 
message. 

Special tests are made to detect cases in which the first 
and second arguments are identical. When this occurs, 
the COPY message is reduced to the equivalent 1- 
argument COPY message. 

The following sets of COPY messages are equivalent if 
"A", "B", and "C" occur (in that order) as program 
names in consecutive level 1 MONARCH ID records on 
a system tape: 

Set 1 : A AAA COPY A THRU A. 
AaaaCOPY B THRU B. 
A AAA COPYC THRUC. 

Set 2: A AAA COPYA. 
A AAA COPY B. 
a aaa COPYC. 

Set 3: A AAA COPY A THRU A. 
AaaaCOPY B THRU C 

Set 4: AaaaCOPY A THRU B. 
A AAA COPYC THRUC. 



Set 5: A 



COPY A THRUC. 



AAA 

Thus, the use of THRU, in a COPY message with two 
arguments, provides an alternative to using a series of 
1 -argument COPY messages. 

Termination of an Update Run 
COPY messages of the form: 
A AAA COPY A SYSEND AA . 

AAA A AA 

or 

A AAA COPY A a A (b)ATHRU A SYSENDAA. 

cause the indicated COPY function to be performed, the 
update process to be terminated, the new system tape to 
be rewound, and control to be returned to the MONARCH 
monitor. In this case, the MONARCH monitor in ques- 
tion is "bootstrapped" from tape on the W buffer. 



Matching of the second program name is inhibited until 
a level 1 MONARCH ID record whose name matches the 
first program name is encountered. 



CONTENTS OF A TYPICAL MONARCH 
SYSTEM TAPE 

1 record containing MONARCH bootstrap and LOADER 

first record of MONARCH loader 

Last record of MONARCH loader 

Al MONITOR 

first record of MONARCH monitor 

Last record of MONARCH monitor 

Al PRINT 

first record of PRINT subroutine 

END record of PRINT subroutine 

Al MTAPE 

first record of MTAPE subroutine 

END record of MTAPE subroutine 

Al CDRP 

first record of CDRP subroutine 

END record of CDRP subroutine 

Al PTYIO 

first record of PTYIO subroutine 

END record of PTYIO subroutine 

Al LIBRARY 

A2 SINE 

first record of SINE subroutine 

END record of SINE subroutine 
A2 COSINE 

Al SYSEND 
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EXAMPLES 

Facsimile of a typical listing of MONARCH ID records 
resulting from a MONARCH update run: 



Al 




LOAD. 


Al 




MONITOR. 




A2 


CONTROL. 




A2 


TABLES. 




A2 


QMSGRD. 




A2 


LDIOSR. 




A2 


CARD. 




A2 


MTYIO. 




A2 


MAGTP. 




A2 


TFMONRCH. 


Al 




PRINT. 


Al 




MTAPE. 


Al 




CDRP. 


Al 




PTYIO. 


Al 




CDR. 


Al 




LIBRARY. 




A2 


CDRP. 




A2 


CDR. 




A2 


PRINT. 


Al 




META920. 




A2 


ENCODER. 




A2 


MON1. 




A2 


MSCONTRL. 




A2 


PREASSEM. 




A2 


ASSEMBLR. 


Al 




UPDATE. 




A2 


BOOTSTRAP. 




A2 


UPDATERT. 


Al 




SYSEND. 



Examples of Program Sequences for Update Runs 

1. To duplicate an existing MONARCH system tape: 

AC TY1W. 

AASSIGN S=MT0W, X1=MT1W, UI=CR1 W, LO=LP. 

AUPDATE. 

A A A COPY LOAD THRU SYSEND AA . 

AAA AA 

2. To insert a system routine ("RN") between existing 
system routines "Rl" and "R2": 

AC CR1W. 

AASSIGN S=MT0W, X1=MT1W, UI=CR1 W, LO=LP. 

AUPDATE. 

A AAA COPY LOAD THRU Rl. 

A l AAAAAA^AAAAAA' 



"first binary record of RN" 



"last binary record of RN (end record)"., 



A A AA COPY R2 THRU SYSEND AA . 

AAA AA 



binary 
deck for 
RN 



3. To delete a system routine ("R7") that appears on 
the old system tape between system routines "R6" 
and "R8": 

AC CR1W. 

AASSIGN S=MT0W, X1=MT1W, UI=CR1W, LO=LP. 

AUPDATE. 

AaaaCOPY LOAD THRU R6. 

AaaaCOPY R8 THRU SYSENDaa. 

4. To replace a system routine ("R7"), appearing on 
the old system tape between "R6" and "R8", with 
a new version of "R7": 

AC CR1W. 

AASSIGN S=MT0W, X1=MT1W, UI=CR1W, LO=LP. 

AUPDATE. 

AaaaCOPY LOAD THRU R6. 

Al AAAAAA R7 AAAAAA- 

"first binary record on new version of R7" 



"last binary record of new version of R7" 
A A A COPY R8 THRU SYSEND A A . 

AAA AA 

5. To insert a new subroutine ("NEW") as the first 
subdivision under "LIBRARY", where "LIBRARY" is 
the name in a level 1 MONARCH ID record on the 
old system tape, "CDR" is the name in the level 1 
MONARCH ID record immediately preceding 
"LIBRARY", and "CDRP" is the name in the first 
level 2 MONARCH ID record under "LIBRARY" on 
the old system tape. 

AC CR1W. 

AASSIGN S=MT0W, X1-MT1W, UKR1W, LO=LP. 

AUPDATE. 

AaaaCOPY LOAD THRU CDR. 

AIaaaaaaLIBRARYa. 

a 2 aaa a aa new aaa a a- 

"first binary record of NEW" 



"last binary record of NEW" 

AaaaCOPY LIBRARY (CDRP) THRU SYSENDaa. 

6. To re-order the system tape. Re-ordering of the 

system tape is accomplished by initializing a rewind 
following a series of COPY messages and/or inserts, 
then reading and executing a new series of COPY 
messages. This allows for repositioning logical files 
on the system tape without having to include the 
binary decks. 
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The control card for the rewind is recognized by 
the update routine. The format of the card is 
AREWIND. No blanks are allowed. (In the up- 
date routine AREWIND implicitly rewinds MTO. ) 

Example: 

Old system tape order is the following se- 
quence of level 1 ID records: 

A BC D SYSEND 
New order of tape requires: 

A C D B SYSEND 
The series of COPY messages should be: 



A AAA COPYA. 

AAA 



A aaa COPY C THRU D. 



AREWIND. 



A AAA COPYB. 

AAA 



A aaaCOPYSYSEND aa . 

AAA A A 



ERROR HALTS DURING UPDATE RUNS 

Certain error conditions occurring during an update run 
cause an error message to be typed and the computer to 
halt. These error conditions are self explanatory and 
include the corrective action needed. The term OST 
refers to the old system tape (S), the term NST refers to 
the new system tape (XI), and the term UPD refers to 
the update input medium (UI), in the texts of the error 
messages. 
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5. PREPARING PROGRAM DECKS 



META-SYMBOL ASSEMBLY AND EXECUTION 

Assemble a META-SYMBOL symbolic program to produce 
an object program for a 910/925. 



Assemble META-SYMBOL symbolic and encoded input 
from card reader. (Note that A EOF indicates termina- 
tion of SI} 



/AENDJOB. 



/^OF 



Symbolic deck 



AMETA910 SI, BO, LP. 



AASSIGN S=MT0W / X1=MT2W. 



AASSIGN SI=CR1W, BO=PPlW. 



/ AASSIGN LO=LP1W. 



/ajob. 













/AENDJOB. 








Ajm&mm^m^mm 






/ Encoded deck 




/AEOF. [l 








/ / 




/Symbolic deck 


::■>:•:• 


/AMETA920 SI, EI, BO, LO. 


/AASSIGN S=MT0W / X1=MT1W. 




/AASSIGN X2=MT2W, SI=CR1\ 


V. 


I 






/AASSIGN EI=CR1W, BO=PP1W. 


Jf 




/AASSIGN LO=LP. 




/AJOB. 













Assemble a META-SYMBOL encoded deck to produce an 
object program for 920/930. (Note that encoded deck 
requires no EOF indication.) 



Assemble META-SYMBOL encoded deck with symbolic 
corrections on a 900 Series Computer to produce an ob- 
ject program to run on 9300. 



/AENDJOB. 



I 



Encoded deck 



AMETA920 EI, BO, LO. 



AASSIGN S=MT0W, X1=MT2W. 



AASSIGN EI=CR1W, BO=PP1W. 



aassign lo=lp. 
/ajob. 



f 



AENDJOB. 



Encoded deck 



AEOF. 



!■■*£«■ ■■ . 



Symbolic correction cards 



3 



r AMETA9300 SI, EI, BO, LO. 



J AASSIGN S=MT0W, X1=MT1W . 



'AASSIGN X2=MT2W, SI=CR1W. 



AASSIGN EI=CR1W, BO=PPlW. 



'AASSIGN LO=LP. 
'AJOB. 
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Assemble a META-SYMBOL encoded deck with symbolic 
corrections, requesting a concordance listing and speci- 
fying symbols to be included and/or excluded. 



/aendjob. 



/aeof. 



EXCLUDE/INCLUDE cards 



Encoded program 

/AEOF. 



I U 



Symbolic correction cards 



/AMETA920 SI, EI, LP, EXCP 



/AASSIGN S=MT0W, X1=MT1W . 



/AASSIGN X2=MT2W, SI=CRIW . 
/AASSIGN EI=CR1W, BOPP1W ." 



/AASSIGN LO=LP. 
/AJOB. 



FORTRAN COMPILATION AND EXECUTION 

(900 Series Only) 
Compile a FORTRAN source program. 



/AENDJOB. 



AEOF. 



FORTRAN source program 



AFORTRAN LO, BO. 



'AREWIND MT1W. 

/AASSIGN SI=CR1W, BQ=MT1W 



/AASSIGN S=MT0W, LO=LP. 



/AJOB. 



Assemble and execute a META-SYMBOL source program. 



Compile and execute a FORTRAN source program. 









/AENDJOB. 






/ 


IB 




/data (if any) 






/ALOAD 0, GO. 


JJ 




/AREWIND MT2W. 




/AASSIGN BI=MT2W. 




/AWE OF MT2W 




/AEOF j 






/ 


/Symbolic deck 




/AMETA920 SI, BO, LO. 




/ A l?r\A/TMn KAT°\A/ 


J 




— — y i_i\\c VV1I s U /VUZVV. 




/AASSIGN S=MT0W,X1=MT1W. 




/AASSIGN BO=MT2W. 




/AASSIGN SI=CR1W, LO=LPlW. 




/ AJOB 









/AENDJOB. 



data (if any) 



AFORTLOAD BI. 



AREWIND -MT1W. 



/ 



AASSIGN BI=MT1W. 



AEOF. 



FORTRAN source program 



J AFORTRAN LO, BO. 



AREWIND MT1W. 



'AASSIGN S=MT0W, SI=CR1W. 



/ AASSIGN BQ=MT1W, LO=LP. 
/AJOB. 
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Compile and execute a FORTRAN program input from 
paper tape. If the source tape does not end with a AEOF, 
control must be transferred to MONARCH manually. 



Compile and execute a FORTRAN program that uses a 
subroutine, written in META-SYMBOL language, which 
must be assembled. 



/aendjob. 



data (if any) 
/AFORTLOAD BI. 



/AREWIND MT1W. 



AASSIGN BI=MT1W. 



/ AFORTRAN LP, BO. 
/ AREWIND MT1W. 



/AASSIGN S=MT0W / SI=PR1W. 



AASSIGN BO=MTlW, LO=LP. 



AJOB. 



F 



Compile and execute a FORTRAN program which in- 
cludes a FORTRAN subroutine and function. 













/ AENDJOB. 








/AFORTLOAD BI. 








/AREWIND MT1W. 






/AASSIGN BI=MT1W. 


-J 




/AEOF. 




/ --^ife^.^ . 




/ FORTRAN function 








/ 


I 




/ FORTRAN subroutine 




/ v^,,V,. ..,.,. 


=~f 


/ FORTRAN mnin prnnrnm 






7 r J 




/AFORTRAN LO, BO. 


I 


f 






/AREWIND MT1W. 


sc_ 


V 




/AASSIGN S=MT0W, BO=MTlW. 


y 




/AASSIGN LO=LP, SI=CR1W. 




/AJOB. 













/AENDJOB. 



/ data (if any) 
/AFORTLOAD BI. 



AASSIGN BI=MT1W. 



AREWIND MT1W. 



AWEOF MT1W. 



AEOF. 



y\ 



FORTRAN subroutine 
written in META-SYMBOL 



'AMETA920 SI, BO, LO. 



AEOF. 



I 



I 



FORTRAN source program 
/AFORTRAN LP, BO. 



— / AREWIND MTIW. 



AASSIGN S=MT0W, BO=MTlW. 



/AASSIGN LO=LP, SI=CR1W. 
/AJOB. 



y 
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Compile and execute a FORTRAN program which uses a 
previously assembled (or compiled) FORTRAN subroutine 
on cards. 



Execute a previously compiled FORTRAN program that 
uses a subroutine, written in META-SYMBOL language, 
which must be assembled. 



/ 



/AENDJOB. 



data (if any) 
/ AEOF. 



Previously assembled 
FORTRAN subroutine 



/ AFORTLOAD BI,X1. 



/AREWINDMT1W. 



/AASSIGN X1=CR1W # BI=MT1W . 



AEOF. 



FORTRAN source program 



/AFORTRAN LP, BO. 



AREWINDMT1W. 



AASSIGN S=MTOW,BO=MT1W. 



/AASSIGN LO=LP,SI=CR1W. 
/AJOB. 



Execute a previously compiled FORTRAN program. 



/ AENDJOB. 



data (if any) 



AEOF. 



Previously compiled FORTRAN 
main program 

/AFORTLOAD XI 



-A 



/AASSIGN S=MT0W, X1=CR1W . 
/AJOB. 



/AENDJOB. 



data (if any) 



/ AEOF. 



Previously compiled FORTRAN 
main program 



■ 



/ 



/AFORTLOAD XI, BI. 



AASSIGN X1=CR1W. 



/ AASSIGN Bi-MTl W. 



AREWINDMT1W. 



AWEOF MT1W. 



J 



AEOF. 



FORTRAN subroutine written In t 
META-SYMBOL 



/AMETA920 SI, BO, La 



/ AREWINDMT1W. 



/ AASSIGN S=MT0W, SI=CRTW ; 
/AASSIGN BQ=MT1W, LO=LP. 



/ AJOB. 
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ALGOL COMPILATION AND EXECUTION 

Compile an ALGOL source program input from cards. 



Compile and execute an ALGOL source program input 
from cards. 



AENDJOB. 



Symbolic deck 



AALGOL BO, LS, LP. 
/AASSIGN S=MT0W, X1=MT1W 



/ AASSIGN LO=LP, BO=PP1W. 
/a JOB. 











/ AENDJOB. 






/ 


■i 




/ data (if any) 






/AALGOLOAD. 




/AREWINDMT2W. 


J 




/AASSIGN BI=MT2W. 




/-^m^rV-^- £ 




/ Symbolic deck |lf 






/AALGOL BO, LS. 






/AREWIND MT2W. 






/AASSIGN S=MT0W, X1=MT1W. 


-J 


/AASSIGN SI=CR1W, LO=LP. 




/AASSIGN BO=MT2W. 




/ajob. 











Compile an ALGOL source program input from paper 
tape. 



Execute a previously compiled ALGOL program. 









/AENDJOB. 






/AALGOL BO, LS. 






/ AASSIGN S=MT0W, X1=MT1W. 






/AASSIGN SI=PR1W, LO=LP. 






/AASSIGN BO=CPlW. 






/AJOB. 

















AENDJOB. 



data (if any) 



ALGOL object program 



'AALGOLOAD. 



AASSIGN S=MT0W, BI=CR1W. 
/AJOB. 



2 



I 



J 
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"next operation" 



/AREWIND MT2W. 



BATCH PROCESSING 



A 



/ AWEOF MT2W 

.*llll l l| 1 l UU.MI.I.II.I. 



icoded deck* 

/ALQADO, TGO, 'RECON' 



r AWEOF MT2W. 



Encoded deck* 

/aLOAD 0, TGO, 'RECON'. 



IEZ7 



/aassign bi=mtow." 



AREWIND MT2W. 

/ AENDJOB. 



J 



data (if any) 
■/" AEOF. 



/ AFORTLOADX1, Bl" 



/ AREWIND MT4W. 
/ AWEOF MT4W. 



/AASSIGN BI=MT4W, X1=CR. 



/AEOF. 



/ AMETA920 SI, BO, LG\ 
/AREWIND MT4W. 



AASSIGN BO=MT4W. 



I 



I 



Previously compiled 
FORTRAN main program 



FORTRAN subroutine written 
in META-SYMBOL 



1 



Encoded program deck 
/AMETA9300 EI, EO, BO, LP. 



-/ AEOF. 



Symbolic program deck 



/ 



AMETA910 SI, BO, LO. 



1 



Encoded program deck 

/ AEOF. 



f 



£ 



/ Symbolic correction cards 
yAMETA920 SI, EI, EO, BO, LO 



AASSIGN BO=CRlW, EO=CP. 



AASSIGN S=MT0W, LO=LP. 
/AASSIGN EI=CR1W, X2^MT2W . 



/AASSIGN SI=CR1W, X1=MT1W . 




I 



RECON is a routine on the system tape. As directed by 
parameters input from the typewriter, RECON reads en- 
coded cards and reconstructs them symbolically on mag- 
netic tape. A description of this routine may be obtained 
from the XDS Program Librarv hv ordering catalog number 
000022. 
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6. OPERATING PROCEDURES 



LOADING THE MONARCH SYSTEM 

1. Mount the MONARCH system tape on magnetic 
tape unit on the W buffer; the unit must be ready 
for operation and the tape positioned at load point. 

2. To load the system initially, proceed as follows: 

a. For XDS 910/920 Computers: 

(1) Set registers X, C, and P and memory 
cell 1 as follows: 



00001 = 32 00002 


WIM 2 


X = 7777777] 


-7 


P =0 




C =0 02 03610 


EOM 03610 



(2) Set the RUN-IDLE-STEP switch to RUN. 
(Do not STEP first.) 

b. For XDS 925/930 Computers: 

Execute the magnetic tape FILL procedure. 

c. For XDS 9300 Computers: 

(1) Press RESET. 

(2) Execute a magnetic tape FILL. 

3. To reload the system once it has been loaded: 

a. For 900 Series Computers: 

(1) Set C = 01 00001 BRU 00001 

(2) Set RUN-IDLE-STEP switch to RUN. 

If this procedure fails: 

(1) Set C = 01 x7736 BRU QBOOT 

X = 1 for an 8K computer 
= 2 for a 12K computer 
= 3 for a 16K computer 

(2) Set RUN-IDLE-STEP switch to RUN. 

If this also fails, execute the loading proce- 
dure described in paragraphs 1 and 2 above. 

b. For 9300 Computers: 

(1) Press RESET. 

(2) Press STEP. 

(3) Press RUN. 

If this procedure fails, execute the loading 
procedure described in paragraphs 1 and 2 
above. 



FURNISHING CONTROL MESSAGES 

When the MONARCH system is initially loaded, the 
monitor attempts to obtain a control message from the 
console typewriter, i.e., the device indicated by the 
contents of QMSG in the unit assignment table. The 
control message medium may be changed from the device 
currently in use to another input device with a C con- 
trol message (described in Section 2). For example, to 
change the control message medium to card reader 1 on 
the W buffer, use the control message 

AC CR1W. 

After processing a C control message, MONARCH imme- 
diately attempts to read a control message from the 
newly assigned device. Control messages may be sup- 
plied on punched cards, paper tape, magnetic tape, or 
manually via an on-line typewriter. 

At any given time while the MONARCH monitor has con- 
trol of the computer, it expects to be able to obtain the 
next control message from the control message medium 
currently assigned. This imposes the following require- 
ments on the console operator. If the medium is a: 

1. Console typewriter, the console operator should be 
prepared to furnish a control message, via the type- 
writer, whenever its input light is lit. 

2. Paper tape reader, the console operator should make 
certain that a paper tape containing a control mes- 
sage is inserted in the paper tape reader before the 
control request is made and that the paper tape 
reader is in operation. 

3. Card reader, the console operator should make cer- 
tain that a card containing a control message is in 
the card reader's input hopper and that the device 
is ready for operation. MONARCH reads cards in 
binary and converts the card image to XDS internal 
code before analyzing the message. 

4. Magnetic tape, the console operator should make cer- 
tain that a reel containing a physical record with a 
control message in it is mounted on the tape unit and 
that the unit is in ready status. MONARCH reads the 
tape in binary (odd parity) mode and assumes the maxi- 
mum record length is 40 words. 

If programs or data precede the next control message on 
the current control message medium (2, 3, or 4 above), 
MONARCH reads successive records from the unit until 
a control message record is encountered or an end-of- 
file condition occurs (cards and magnetic tape only). If 
an end-of-file is encountered before a control message 
is read, MONARCH types an appropriate message and 
requests the next control message from typewriter 1 on 
the W buffer. 
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Contents of 




Normal, Planned, 








Register C 


Program 


or Error Halt 


Explanation of Halt 


Recovery Procedure 


Action 


OOlxxxxx 


Loader 


Planned 


Computer halts when an 


Set RUN-IDLE-STEP switch to RUN 


Transfers to object program 


(xxxxx = 






end card with a transfer 


to execute the program. 


for execution of that pro- 


transfer ad- 






address is encountered. 




gram. 


dress from 






This halt occurs only when 






end card) 






the value of the second 
parameter of the LOAD 
control message so speci- 
fies, i.e. STOP, TSTP. 






001xy650 


Loader 


Normal Planned 


Stops in the octal dump 


Reset the A and B registers to con- 


Dumps the next requested 


(See "Octal 






console driver routine. 


tinue the dump operation or set the 


area to line printer 1 on 


Dump Routine" 








C register to 00100355 (BRU 


the W buffer or selects the 


in Section 4 








RDMSGR) to have the system read a 


control message medium 


for values of 








control message. 


for input. 


x and y. ) 








Set the RUN-IDLE -STEP switch to 
RUN. 




02000000 


Update 


Normal 


Normal halt when update 
medium is paper tape. 


Set (A) > if the program just read 
was the last paper tape record and 
clear the halt. 

Set (A) = if the program just read 
was not the last one. Insert next 
program tape into the paper tape 
reader and clear the halt. 


Continues update process. 


02000001 


Loader or 


Error 


This halt indicates a buf- 


1. For card input, replace the 


1 . Not applicable. 




Bootstrap 




fer error. 


misread card in the hopper. 






Loader 






Set the RUN-IDLE-STEPswitch 






(MTOonly) 






to RUN. 

2. For paper tape input, reposition 
the record for re-read. Set the 
RUN-IDLE-STEP switch to RUN. 

3. For magnetic tope unit the 
program automatically tries ten 
times to read the record. Setting 
the RUN-IDLE-STEP switch to 
RUN causes it to fry once more. 


2. Not applicable. 
3- Not noolicnhle. 


02000003 


Loader 


Error 


This halt indicates an 
illegal input format. 


Clear the halt to cause the program 
to ignore the record and continue. 


Not applicable. 


02000004 


Loader or 


Error 


A checksum error has oc- 


Clear the halt to cause the program 


Not applicable. 




Bootstrap 




curred. 


to ignore the error and continue. 






Loader 










02000006 


Loader 


Error 


This halt indicates symbol 
table overflow. 


No recovery. 


Not applicable. 


02000007 


Loader 


Error 


Unsatisfied external label 
or POP reference remains 
after library search. Un- 
satisfied references and /or 


1. No recovery; i.e., no way to 
satisfy the references or defini- 
tions. 


1 . Not applicable. 








missing definitions are auto- 


2. Clear the halt to ignore the un- 


2. Error is ignored. 








matically output to the type- 


satisfied labels or references and 










writer or line printer. 


continue. 




02000010 


Loader 


Error 


Duplicate external labelsor 
POP definitions encountered. 


Clear the halt to continue. 


Error is ignored. The first 
definition encountered 
will be used. 


02022222 


Loader 


Planned 


The computer halts when an 
end record with no transfer 
address is encountered. This 
halt occurs only when re- 
quested (i.e., only when 
the value of the second pa- 
rameter of the LO^D control 
message so specifies). 


Set (A) = load relocation bias of next 
program, and set RUN-IDLE -STEP 
switch to RUN to continue loading. 


Reads next program unit. 


04010410 


Loader 


Normal Planned 


Stops in the symbol table 
typeout driver routine. 


Clear the halt to continue. 


Reloads MONARCH sys- 
tem into core. 



Figure 1. MONARCH Program Halts and Recovery Procedures 
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PROGRAM HALTS AND RECOVERY PROCEDURES 

All error messages are self-explanatory and include re- 
covery procedures, whenever recovery is possible. These 
messages are listed on typewriter 1 on the W buffer if 
Breakpoint 1 is reset or on line printer 1 on the W buf- 
fer if Breakpoint 1 is set. 

As stated previously, control messages may be input from 
cards, paper tape, typewriter, or magnetic tape. However, 
if an error is detected in a control message, typewriter 
1 on the W buffer isselected for input (after an appropriate 
error message is output), and MONARCH waits for a new 
control message to be submitted by the operator. 

Figure 1 describes normal, planned, and error halts for 
which no messages are produced. The errors are identi- 
fied by codes placed in the C register. 

SYSTEM OUTPUT 

Parameters of various control messages enable the user 
to specify that certain information be produced during 
or following the operation of portions of the MONARCH 
system. For example, with a LOAD control message 
parameter the user may request a printout of the loader's 
symbol table; via the FORTLOAD control message he 
may specify that a label map, a storage map, and/or 
a trace of the object program be printed. 

MONARCH LOADER'S SYMBOL TABLE 

The MONARCH loader constructs a symbol table during 
the loading of a program. If the parameter TSTP or 
TGO appeared in the LOAD control message, the load- 
er will output this symbol table after the program has 
been loaded. The table is produced on typewriter 1 on 
the W buffer if Breakpoint 1 is reset or on line printer 1 
on the W buffer if Breakpoint 1 is set. For a 900 Series 
computer with a 12K memory, the printout has the for- 
mat shown below. A complete symbol table list is given 
in Figure 3 at the end of this section. "Symbol Table 
Typeout" in Section 4 explains the procedure for producing 
a symbol table for computers with other memory sizes. 



QLPB5556 
QCP36656 
QCR 36566 
QL 735555 


40027761* 
1*0027763 
1*0027762 
1*0027761 



QSYSTP66 
AC CUM 156 
WDTYP666 
E0M66665 



1*002721*1* 
1*0000206 
1*0000212 
1*0000213 



eight characters). The first group of symbols, each be- 
ginning with O, are the loader's external label defini- 
tions that allow the user's program to reference locations 
within the resident portion of MONARCH. Following 
these are the symbols from the user's program. 

The second column lists the numeric codes specifying the 
types of symbols (external label definitions, external 
POP references, etc.) and the locations to which the 
symbols are assigned (the last five octal digits). If the 
first digit (counting from the left) of the numeric code is 
equal to or greater than 4 (i.e., bit position of the 
computer word contains a 1 bit), the reference is satis- 
fied; if the first digit is less than 4 (i.e., bit position 
of the computer word is a bit), the reference is unsat- 
isfied. If the fourth digit (counting from the left) is 
equal to or greater than 4 (i. e., bit position 9 of the 
computer word is a 1 bit), the symbol in the first column 
has a duplicate definition, in which case the first defi- 
nition encountered is used and the subsequent duplicate 
definition is ignored. See Appendixes C and F for a 
detailed description of the various types of symbols and 
how they are designated. 

FORTRAN LOADER'S OUTPUT 



The first column contains the 8-character symbols (trail 
ing blanks are supplied for symbols having fewer than 



During the loading of an object program, the FORTRAN 
loader outputs the headings NAME, ENTRY, ORIGIN, 
LAST, SIZE/10, COMMON, and BASE (on typewriter 
1 on the W buffer if Breakpoint 1 is reset or on line 
printer 1 on the W buffer if Breakpoint 1 is set). 

If neither a label map nor a storage map is requested, the 
next output shows the program name, the entry location, 
the origin of the program, the last location of the pro- 
gram, the number (in decimal notation) of locations oc- 
cupied by the program, and (when applicable) the number 
(in octal notation) of COMMON locations. If a label is 
requested, it is output immediately below the headings. 
If a storage map is also requested, it is output following 
the label map. An abbreviated example of the FORTRAN 
loader's output is given in Figure 2. 

The entry, *PROGRAM, is always printed; it identifies 
the line containing the total program storage information. 
$$$$$$$$ is the compiler-assigned identification for the 
main program. 

The value in the column BASE is used to determine the 
exact location of variables. Variables are compiled to 
be stored immediately following the program in which 
they are used. At compilation time, variables are as- 
signed locations relative to the end of the program; it 
is these relative locations which are printed as "Program 
Allocation" by the compiler. To determine the absolute 
location of a given variable, add its relative location to 
the value listed by the FORTRAN loader as "base" for 
the program containing that variable. For example, 
assume the variable J was assigned relative location 55. 
Using the base shown in Figure 2, the absolute location 
of J is determined by adding 04643 and 55, which re- 
sults in 04720. 



38 



NAME 


ENTRY 


ORIGIN 


LAST 


SIZE/10 


COMMON 


BASE 


7 


03522 












2 


03525 












= 232 


03547 












= 7232 


03553 












$$$$$$$$ 


03462 


03452 


05224 


875 




04643 


ABSF 


05226 


05225 


05242 


14 






203 SYS 


05244 


05243 


05254 


10 






*PROGRAM 


03462 


03452 


06101 


1304 







Figure 2. FORTRAN Loader Output 



QLP36666 


1*0027761* 


WDTYP666 


1*0000212 


MTY 10666 


1*0001*023 


QCP36666 


^0027763 


E0M66666 


1*0000213 


MPRNT666 


1*000521*1 


QCRB6666 


1*0027762 


I0RELC66 


1*0000231 


C0DES666 


1*00021*26 


QL7B6666 


U0027761 


PRMCTR66 


1*0000237 


PARAMS66 


1*0002650 


QL6B6666 


U0027760 


METPRC66 


1*000021*2 


0MSGRD66 


1*0003277 


QL5B6666 


1*0027757 


CMFDT666 


1*0000250 


CHAR6666 


1*0003177 


QLUB6666 


40027756 


CADDR666 


1*0000255 


BTLDX666 


1*0007100 


QL3B6666 


1*0027755 


MSG66666 


1*0000256 


LD 12X666 


1*0007065 


QL2B6666 


1*002775** 


RDMSG666 


1*0000326 


CTFDT666 


1*00031*65 


QL1B6666 


1*0027753 


RDMSGR66 


1*0000355 


CTBUF666 


1*00031*71* 


QL0B6666 


1*0027752 


MSGRST66 


1*0000576 


H0LBCD66 


1*0003333 


QSYSP666 


1*0027775 


GETWRD66 


1*0000617 


LDI0SR66 


1*000551*0 


QB IN 1666 


i*002777U 


TYPM6666 


1*0001231 


SYf13AR66 


1*0006753 


0SYM0666 


1*0027773 


TYP0UT66 


1*0001231 


META6666 


1*0006335 


QB 1 N0666 


1*0027772 


SET66666 


1*0001365 


FLPT6666 


1*0006225 


QSYST666 


1*0027771 


DISPLY66 


1*00011*10 


F0RTLA66 


1*000601*1* 


QSYMI666 


1*0027770* 


ASSIGN66 


1*00011*70 


FCPT6666 


1*0006236 


QSYS6666 


1*0027767 


L6666666 


1*0001535 


F0RTCA66 


1*0005775 


OS YS 1666 


1*0027765 


3TLD6666 


1*0001607 


FKPT6666 


1*0006221* 


QSYSU666 


1*0027776 


ABS66666 


1*0001617 


F0RTKA66 


1*000601*0 


QPESW666 


1*0027777 


REL66666 


1*0001631 


ALG0LA66 


1*0006262 


QSYLDR66 


1*00251*31 


MESSAG66 


1*0001713 


P0SN6666 


1*0006617 


0B00T666 


1*0027736 


MESSPR66 


1*0001731* 


LABEL666 


1*0006572 


QDUMP666 


1*002761*6 


CRDTP666 


1*0001735 


REWIND66 


1*0006531* 


QETBL666 


1*00261*76 


L0AD6666 


1*0002077 


WE0F6666 


1*000651*2 


QMSG6666 


1*0027766 


FILLSY66 


1*0002216 


BKFILE66 


1*00061*22 


QSRCH666 


1*0027101* 


J0BMSG66 


1*0002232 


SKFILE66 


1*0006500 


QCW66666 


1*002721*6 


ENDJ0B66 


1*0002236 


BICREC666 


1*0006501* 


0TAPE666 


1*0026760 


UPDATE66 


1*000221*2 


SKREC666 


1*0006511 


QPAPER66 


1*0026737 


GSYSP666 


1*0002276 


F0RTBIAS 


1*0006672 


0CARD666 


1*0026711* 


0MTE6666 


1*0002311 


LD 126666 


1*0006331* 


riSYSIN66 


1*002721*3 


SRLDSY66 


1*0002313 


QENDMN66 


1*00071*55 


QSYSTP66 


1*002721*1* 


CARD6666 


1*0003560 






AC CUM 166 


1*0000206 


MAGTP666 


1*0001*501 







Figure 3. MONARCH Loader Symbol Table (900 Series Computer, 12K Memory) 
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APPENDIX A. THE MONARCH UNIT ASSIGNMENT TABLE 



To allow the use of the same input/output device for the same function throughout a series of runs, 
MONARCH maintains a table of standard unit assignments in upper memory. Each entry represents, by 
convention, a particular input or output function. For example, in a batch of runs consisting of as- 
semblies and compilations, it is desirable to be able to designate a particular output unit (e.g. , a card 
punch) as the unit on which all object programs are to be written. In the MONARCH system, this unit 
is referred to as the binary output unit (BO) and would be assigned, in this case, BO =CP1W. 

Twenty-one such input/output functions have been designated in the MONARCH system; ten standard 
UAT entries and eleven special purpose Business Language package I/O entries. Additional functions 
may be added at a later date. The format of the unit assignment table entries and a description of the 
functions currently provided are given below. 

Standard XDS I/O subroutines are constructed so that they can make use of the MONARCH unit assign- 
ment table to obtain unit and channel codes for their operation. The reader should consult the description 
of these subroutines for additional information regarding the use of the MONARCH unit assignment 
table. (The program description catalog numbers for these subroutines are shown on the tape listing in 
Appendix B. ) 

At load time the unit assignment table is automatically allocated to the top of core in relocatable form. 
The last word of the unit assignment table is $QPESW, a 1-word entry defined as the job and processor 
error switch (see JOB and ENDJOB control messages in Section 2). The format of the words in the 
UAT is illustrated below. The upper portion of each diagram contains identifying symbols which, along 
with their definitions, describe the contents of the word. The lower portion of each diagram shows the 
number of bits reserved to each of these elements. 



Contents 



Number of bits 



A 


B 


(1) 


(23) 





1 


23 



A = Job mode indicator: 

= not in job mode 

1 = in job mode 

B = Processor error count 



Format of the 1-word unit assignment table entries for 900 Series MONARCH: 



Ul 





U2 


C 





Address of I/O Subroutine 


0) 


(1) 


(4) 


(3) 


(1) 


(U) 





1 


2 5 


6 8 


9 


10 23 



Ul U2 = Unit Address Code (5 low-order bits of the 6-bit unit address code) 
C = Channel designator: 
0= W buffer 
1 = Y buffer 

Format of the 2-word unit assignment table entries for 9300 MONARCH: 
Word 1 



Contents 
Number of bits 



000 000 000 


Address of I/O Subroutine 


(9) 


(15) 







8 


9 




23 



Contents 
Number of bits 



40 



Word 2 






C2 





CI 


0000000000000 


C3 





Unit Ad- 
dress Code 


(1) 


(1) 


(1) 


(1) 


(13) 


(1) 


(1) 


(5) 





1 


2 


3 


4 16 


17 


18 


19 23 



CI = high-order bit of the 3-bit channel code 

C2 = second highest order bit of the 3-bit channel code 

C3 = low-order bit of the 3-bit channel code 



Contents 



Number of bits 



The high speed printers are designated, in UAT entries, by unit address codes of 20q (number 1) and 21 ft 
(number 2). 

STANDARD UNIT ASSIGNMENT ENTRIES 



Function 

Control message input 

System (MONARCH magnetic tape) 

System scratch 

System intermediate output scratch (magnetic tape) 

System scratch (magnetic tape) 

Encoded output (META-SYMBOL) 

Symbolic input (e.g., card reader) 

Symbolic output, Update input 

Binary input (loader uses this) 

Encoded input (META-SYMBOL) 

Binary output (e.g., card punch) 

List output (e.g., printer) 

BUSINESS LANGUAGE UNIT ASSIGNMENT ENTRIES 





MONARCH 


External 


Symbolic 


Label 


Parameter 


$QMSG 


— 


$QSYS 


S 


$QSYST 


XI 


$QSYSI 


X2* 


$QSYSP 


X3 


$QSYSP 


EO 


$QSYMI 


SI 


$QSYSU 


SO, UI 


$QBINI 


BI 


$QBINI 


EI 


$QBINO 


BO 


$QSYMO 


LO 



Function 

Magnetic Tape Zero 
Magnetic Tape One 
Magnetic Tape Two 
Magnetic Tape Three 
Magnetic Tape Four 
Magnetic Tape Five 
Magnetic Tape Six 
Magnetic Tape Seven 
Card Reader 
Card Punch 
Line Printer 





MONARCH 


External 


Symbolic 


Label 


Parameter 


$QL0B 


L0 


$QL1B 


LI 


$QL2B 


L2 


$QL3B 


L3 


$QL4B 


L4 


$QL5B 


15 


$QL6B 


L6 


$QL7B 


L7 


$QCRB 


LCR 


$QCPB 


LCP 


$QLPB 


LLP 



When a standard processor such as FORTRAN or META-SYMBOL is loaded, MONARCH selectively loads 
any standard I/O subroutines required for I/O functions which the processor is expected to perform. The 
address of each I/O subroutine loaded is stored in the UAT entries whose unit address codes correspond 
to that subroutine. For example, if the magnetic tape I/O subroutine is selectively loaded, its address 
is stored in each UAT entry whose unit address code specifies a magnetic tape unit. 



X2 must be assigned to magnetic tape unit 2 (MT2) under MAGPAK environment when using META- 
SYMBOL. 
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MONARCH maintains a list of standard I/O subroutines required for each system action routine, in addi- 
tion to the initial loading address for the first I/O subroutine to be loaded for operation with the system 
action routine. 

MONARCH provides external label definitions for unit assignment table entries which correspond to I/O 
subroutines selectively loaded by the MONARCH loader. 

The I/O subroutines are referred to indirectly through the unit assignment table in upper memory. Unit 
assignments can be made externally through ASSIGN messages. Note that the ASSIGN message does 
not set up I/O subroutine addresses (bits 10 through 14) in UAT entries. 

The Business Language user's program is linked to the Business Language I/O handlers via external 
references and definitions at load time. 
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APPENDIX B. THE MONARCH SYSTEM TAPE 



The MONARCH system tape consists of an ordered collection of programs and data files preceded by a 
special bootstrap loader which itself can be loaded under control of the FILL switch on the XDS 910/925 
Computers, the magnetic tape FILL switch on the XDS 925/930 Computers, and the magnetic tape LOAD 
switch on the XDS 9300 Computer. The bootstrap loader, in turn, loads the MONARCH loader and the 
MONARCH monitor. All programs (or processors) on the system tape except the bootstrap loader and the 
MONARCH loader are preceded by MONARCH ID records. The MONARCH monitor, the MONARCH 
loader and the MONARCH update routine all make use of MONARCH ID records to locate programs or 
data files on a MONARCH system tape. Only the first 16 characters of a MONARCH ID record are 
interpreted by the MONARCH operating system. MONARCH ID records have the following format: 



Character 

Position 

Contents 



1 


2 


3 


4 


5 


6 


7 


8 


9 10 11 12 13 14 15 16 


17 18 19 ] 


A 


n 


6 


f> 


i> 


* 


i> 


f> 


a ccccccc 


e e e \ 



i 70 71 72 



n = 1 or 2 

1S = space 

a = any alphabetic character 

c = any alphanumeric character or trailing space (i.e., space not followed by another character) 

e = any character 

Major divisions of a MONARCH system are preceded, on the system tape, by a level 1 MONARCH ID 
record: 

A l AA A AAA PROGNAME. . . 

AAAAAA 

Minor divisions are preceded by a level 2 MONARCH ID record: 
A2 A AAA SUBRNAME. . . 

A A. A. A, A. A. 

Minor divisions of a MONARCH system are arbitrary subdivisions of a program or of a data file that are 
recognized by the MONARCH update routine. Normally, these subdivisions serve only to enable the 
user to update an old system tape at the subdivision level, i.e., to insert, delete or replace one or 
more subdivisions of a program without affecting the remaining subdivisions. Individual subroutines on 
the MONARCH library are also separated by level 2 records both for the MONARCH loader and to 
make it possible to insert, delete, and replace the subroutines individually. 

Program names occurring in level 1 MONARCH ID records must be unique within a given MONARCH 
system tape. Program names occurring in level 2 MONARCH ID records need be unique only within a 
given major subdivision of a MONARCH system tape. The following additional rules apply to the 
program names on a given MONARCH system tape: 

If A and B are unique program names occurring in level 1 MONARCH ID records and X and Y are unique 
program names occurring in level 2 MONARCH ID records, then A, B, X, and Y may be used as program 
names in level 2 ID records of A and/or B. Symbolically this may be represented as 



Level 1 L 



Level 2 i A , , B , , X , , Y , , A , , B , ,_X_ 



Y 



The last record on a MONARCH system tape is a level 1 MONARCH ID record with the program name 
SYSEND in characters 9 through 14 (15 and 16 must be blank). 
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The system tape contains the monitor, the MONARCH loader, the system tape update routine, and other 
standard system routines required by the particular installation using the system. The system tape unit 
must be assigned as unit on the W buffer for the XDS 910/920, unit on channel W for the XDS 925/930, 
and unit on channel A for the XDS 9300. A sample listing of the contents of a system tape for a 920 
computer appears at the end of this appendix. 

MONARCH SYSTEM TAPE RECORDS 

Format of first words of valid system tape records: 

XDS STANDARD BINARY OBJECT PROGRAM RECORD (first word) 



Record 
Type (T) 



Word Count (C) 



Mode 
(Binary) 



Folded Checksum (FC) 



(3) 



0) 



(5) 



101 



(12) 



2 3 4 



8 9 



11 12 



23 



META-SYMBOL ENCODED PROGRAM RECORD (first word) 



Record 
Type (T) 


Word Count (C) 


Mode 
(Binary) 


Folded Checksum 




(3) 


(6) 


111 


(12) 


> 


2 


3 8 


9 11 


12 




23 






MONARCH ID RECORD (first word) 



A Character 



Zero 



Mode 
(IDL) 



0/jO/f 



Space Character 



Space Character 



101 111 



000 



110 000 



110 000 



\— 

17 18 







5 6 



8 9 



11 12 



23 



IDL = 001, Major Division - Level 1 ID Record 
IDL = 010, Minor Division - Level 2 ID Record 

MONARCH BOOTSTRAP LOADER (first word = WIM 012,2) 



X 


OPERATION 


I 


Address 


1 


110 10 





00000 00000 


10 10 



MEMORY ALLOCATION 

The amount of normal core allocation can be determined with the formula 



QENDMN + Loader + Symbol Table = size 
(starting address) (length) (length) 



QENDMN 
Loader 

Symbol Table 
Total 



octal 

7455 

2512 

454 

12643 



decimal 
3885 
1354 
300 



5539 



The formula is valid for 9300 Computers; however, the amounts given are for a 900 Series Computer. 
The symbol table requires three words per definition. 



44 



The amount of core allocation during an update run can be determined with the formula: 



LDIOSR 
(starting address) 



+ Loader + Bootstrap Loader + Update - 
(length) (length) (length) 



Symbol Table = size 
(length) 



octal 



decimal 



LDIOSR 
Loader 

Bootstrap Loader 
Update 
Symbol Table 
Total 



The following 
of the listing. 



5540 
2512 

260 
4136 

454 
15344 

ttt 



2912 
1354 

176 
2142 

300 
6884 



s a sample tape listing for a 920 Computer. The circled numbers refer to notes at the end 



© 



Al 
Al 



© 



61 
Al 
Al 
Al 
Al 



© 



Al 
Al 
Al 



A? 
A 2 
A 2 

A 2 

A2 

A 2 
A 2 
A 2 

a2 

A2 
a2 
a2 
A2 



A2 
A2 
a2 
A2 
A2 
A2 
A2 
A2 
A 2 
A2 
A 2 
A 2 
A2 
A2 



a2 
A2 

A 2 



L3AD 

K0NIT0P 

CONTROL 
TABLES 
CMSGRD 
CARD 

f- t y I e 

KAGTP 

fPRNT 

LDIOSR 

F R 7 A C T 

FORTbl AS 

ALG3LA 

LDI2 

TFtfONRCH 

PRINT 

M T A P E 

CDRP 

PTYin 

MET A 520 

ENCODER 

POM 

KSC0MRL 

PREASSEM 

PReCQU 

PR0C920 

PR0C93J0 

PRPCB920 

SriRINK 

ASSEM&LR 

PAS2 

FINISH 

C8NCPD 

COM2 
LIV'KINIT 
L INK/ERR 
FORTRAN 

FC1 

FC2 

FC3 



© 



© 



06/24/65 
06/24/65 
U6/30/65 
04/0 1/65 
04/01/65 
0^/01/65 
04/30/65 
OtJ/14/65 
05/20/65 
4/05/65 
04/01/65 
04/01/65 
06/30/65 
04/01 /65 
0^/14/65 
04/3 0/65 
04/01/65 
04/01/65 
06/30/65 
d 06/30/65 
B 05/20/65 
6 U4/01/65 
06/30/65 
04/27/65 
06/17/65 
05/02/65 
05/12/65 
06/30/65 
06/30/65 
06/30/65 
06/30/65 
06/12/65 
06/12/65 
04/22/65 
04/22/65 

04/01/65 
04/01/65 
05/14/65 



— LABEL' 
1174 

0425 
0177 
0162 
0225 
0352 
0191 
0157 
0161 
0000 
004 1 
0592 
0002 
0191 
0352 
0211 
0225 



0640 



0665 
2496 

--LA8EL 

1568 
0449 
0449 



042012 , 

042004 

042005 

042006 

030004 

020019 

040004 

060005^ 

042007 

04 2014 

042015 

042017 

042030 

042C08 

0600053 

040004 , 

030C05 

020019 



• • • 

• • • 



202004H 



The formula is valid for 9300 Computers; however, the amounts given are for a 900 Series Computer. 



tt 



The symbol table requires three words per definition. 

ttt T1 . 

i ms sample 
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Al FORTLOAD S --LA3EL--- 012015 



ai foptlib --label--- 202006H 





FORTLOAD S 




--LA8EL 


A2 


FL1 


04/01/65 


0231 


A2 


FL2 


05/24/65 


0253 


A2 


FL3 


05/12/65 


0025 




FOPTLIB 




--LABEL 


A2 


SYS230 


04/01/05 


0108 


A2 


ALOG 


04/01/65 


0136 


A2 


tKP 


04/01/65 


0144 


A2 


cos 


04/01/65 


02C3 


A2 


SORT 


04/01/65 


0083 


A2 


ATAN 


04/01/65 


0256 


A2 


ABS 


04/01/65 


0013 


A2 


IABS 


04/01/65 


0013 


A2 


FLOAT 


04/01/65 


0004 


A2 


IFIX 


04/01 /65 


oooe 


42 


SIGN 


04/01/65 


0021 


A 2 


IS1GN 


04/C1/65 


0020 


A2 


AHOD 


04/01/65 


0013 


A2 


^OD 


04/01/65 


0009 


A 2 


AMIN 


04/01/65 


0065 


4 2 


EIM 


04/01/65 


0010 


A2 


IDIM 


04/01/65 


0010 


A2 


LOCF 


04/01/65 


0004 


A2 


IF 


04/01/65 


0025 


A2 


EXIT 


04/01/65 


0010 


A2 


LINKING 


04/01/65 


0010 


a2 


SYS160 


04/01/65 


0013 


A2 


SYS201 


04/01/65 


0004 


A 2 


SYS202 


04/01/65 


0008 


42 


SYS203 


04/01/65 


0009 


A2 


SYS2U4 


04/01/65 


0019 


A2 


SYS205 


04/01/65 


0021 


A 2 


SYS206 


04/01/65 


0011 


A2 


SYS207 


04/01/65 


0021 


a2 


SYS210 


04/01/65 


0010 


a2 


SYS21 1 


04/01/65 


0053 


a2 


SYS212 


04/01/65 


0033 


A2 


SYS213 


04/01/65 


00C9 


a 2 


SYS214 


04/Q1/65 


0009 


A 2 


SYS215 


04/01/65 


0006 


A 2 


SYS216 


04/OJ /65 


0036 


42 


SYS217 


04/01/65 


0005 


a2 


SYS220 


04/01/65 


0074 


A 2 


SYS221 


04/01/65 


0005 


A2 


SYS222 


04/01/65 


0057 


A2 


SYS223 


04/01/65 


0007 


A2 


SYS224 


04/01/65 


0006 


A2 


S Y S 2 2 5 


04/01/65 


0046 


A 2 


SYS226 


04/01/65 


0026 


A2 


SYS227 


04/01/65 


0019 


A2 


SYS231 


04/01/65 


0003 


42 


SYS232 


04/01/65 


0003 


A2 


SYS233 


04/01/65 


0028 


A2 


SYS235 


04/01/65 


0036 


A2 


SYS236 


04/01/t>5 


0230 


A 2 


SYS241 


04/01/65 


0349 


A2 


SYS242 


04/01/65 


0057 


A2 


5YS243 


04/01/65 


0046 


a2 


SYS244 


04/01/65 


0018 


A2 


SYS245 


04/01/65 


0445 


A2 


SYS776 


04/22/65 


1122 


A2 


SYS777 


04/01/65 


1472 



FORTRAN 
Library 



2C2005H 
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© 



© 



Al 


LIBRARY tj 




A2 


CDRP 


04/01/65 


a.2 


CDP 


G4/0 i/h5 


A2 


PTYIP 


04/01/65 


a2 


PRINT 


06/14/65 


A 2 


MTAPE 


04/01/65 


A 2 


BDD 


07/01/65 


A2 


BFS 


07/01 /65 


A2 


BDF 


07/01/65 


A2 


CBD 


07/01 /65 


A2 


CFS 


07/^1/65 


A 2 


L&F 


7/01/65 


A2 


sin 


07/01 /65 


A 2 


£18 


07/01/65 


A2 


L8G 


07/01/65 


A2 


LGF 


U7/G1/65 


A 2 


EXP 


G7/01/65 


A 2 


exf 


07/01/65 


*. 2 


AT\ 


07/01 /65 


A 2 


ATC 


07/01/65 


A 2 


ATF 


07/01/65 


A2 


CSD 


07/01/65 


a2 


CSF 


07/01/65 


A 2 


cas 


7/01/65 


A 2 


DSG 


07/01/65 


A 2 


FSG 


07/01/65 


a2 


SGR 


07/01/65 


A2 


FFF 


07/01/65 


A2 


FSN 


C7/01 /65 


a2 


FLD 


07/01/65 


A2 


CPK 


07/01/65 


a2 


CPD 


07/01 /65 


A 2 


LDP 


07/01/65 


A 2 


SID 


07/01/65 


A2 


LTP 


07/0! /65 


A2 


STP 


7/01/65 


A 2 


uQP 


07/01/65 


a2 


STG 


07/01/^5 


A 2 


TRACE 


b 4/01/65 


Al 


SYMBOL 


05/C6/65 


A 2 


LOADER 


6 05/20/65 


A2 


FSI 


05/06/65 


A 2 


CSI 


05/06/65 


A 2 


l*SI 


05/06/65 


a2 


PaP 


05/06/65 


A 2 


cae 


05/06/65 


a2 


NbB 


05/06/65 


a2 


TLO 


5/06/65 


A 2 


LLe 


05/06/65 


A 2 


ml* 


05/06/65 


A 2 


SI 


06/27/65 


A 2 


S2 


05/C6/65 


* 2 


SJ 


05/06/65 


A 2 


M9in 


05/06/65 


A 2 


M92CJ 


05/0O/65 


A 2 


M930U 


05/06/65 


Al 


M E n I A a 


05/12/65 


Al 


TRACE b 


04/01/65 


Al 


REce\ p 


05/18/65 


Al 


PRINTDGN B 


10/09/64. 


Al 


UPDATE B 




A 2 


eeRTSTRAP 


04/01/65 


A2 


LPDATERT 


04/22/65 


Al 


ALGOL B 


4/01/65 


a2 


ALG8L1 


04/01/65 


a 2 


A L G 9 L X 


4/01/65 



--LABEL- 

0211 

0162 

0225 

0191 

0351 

0184 

0075 

0171 

017* 

0052 

0169 

0097 

00 8-3 

0048 

0152 

0062 

0159 

0057 

0158 

0249 

0148 

0217 

0032 

0082 

0071 

0C84 

0082 

0124 

0206 

0010 

00 7 6 

0006 

00C6 

ocoe 

0009 
0010 
0011 

05 4 4 



2408 


0544 


1773 


--LABEL 


014J 


1519 


--LABEL 


4582 


n «; m 



202003D.... 
030005 
030004 
020019 

060005B 
040004 
2030378 
2030148 
203039B 
2C3036B 
203015B 
203038B 
203012S 
2030138 
203009B 
203024C 
203008B 
203C25C 
2030078 
203032B 
203026C 
2030348,033 
203C2SC027 
2030188*006 
203035B 
203C29B 
2030198 
203011C 
203010B 
203023C 
203C22B 
203Q229, 408*0178. . 016B 
203022B 
203022B 
2030208 
2030208 
203021B 
2030218 
2600038 



META- 

SYMBOL 

Library 



000017C. . 
2600038. . . 
000022A. . . 



042009 
042011 
242008 
042018 
042019 



47 



61 



© 



4 1 



41 





ALG6L8AD 


A2 


RL 


A2 


INPUT 


A2 


3UTPUT 


42 


ENDI& 


42 


ENDIPL 


42 


ACCTAP 


42 


PNCHTP 


A2 


ACCEPT 


a, 2 


TYPE 


A2 


Scad 


42 


PUNCH 


42 


PRINT 


A2 


kEADIT 


A2 


*RIT5T 


A2 


R E w W T P 


A 2 


REWIND 


42 


SETI6T 


42 


T ST ART 


A 2 


TREACY 


A2 


IMTFS 


42 


AdS 


A2 


SQRT 


A2 


1EXP 


A 2 


LN 


42 


EXP 


4 2 


LGF 


A2 


EXF 


42 


SIGN 


A2 


siNces 


42 


ARCTAN 


42 


IMN 


A2 


i^ AX 


A2 


PQD 




A L G 8 R U N 


A 2 


EXEC 


A2 


FSCAlv 


A2 


LIST 




SYSEND 



04/01/65 


--LABEL- 


04/01/65 


0883 


04/01/65 


0036 


04/01/65 


0036 


04/01/65 


0007 


04/01/65 


0006 


04/01/65 


0014 


04/01/65 


000* 


04/01/65 


0020 


U4/01/O5 


0008 


04/ u l/f'5 


00 3 5 


04/01/65 


0045 


04/01/65 


0074 


04/01/65 


0073 


04/01/65 


0056 


4/01/65 


0360 


04/01/^5 


0012 


04/01/65 


0056 


04/01 /65 


0046 


04/01/65 


0017 


04/01 /65 


0029 


04/01/65 


0014 


04/01 /65 


00.8 3 


04/01/65 


0154 


04/01/65 


001 1 


04/01/65 


0011 


04/01/65 


0145 


04/01/65 


0151 


04/01/65 


0022 


04/01/65 


0200 


04/01/65 


0261 


04/01/65 


0015 


04/01/65 


0015 


04/01 /65 


0023 


04/01/65 


--LABEL 


04/01/65 


1602 


04/01/65 


1371 


04/01/65 


0355 



242009 
042020 
042C21 
012019 
012020 
012021 
012022 
012023 
012024 
032002 
032003 
062003 
042022 
042023 
042025 
042024 
042026 
04 2027 
042026 
012025 
012026 
212005 
212006 
012026 
012027 
212018 
212007 
012029 
212009 
212010 
012030 
012031 
012030 



242011 
212012,13. 

242010 



ALGOL 
Library 



Notes: 



1. If CONTROL routine is replaced (see "System Update Routine" in Section 4), the AT MONITOR 
label card must precede the A2 CONTROL card and the binary deck; this rule is generally true 
for the first program in each logical file. 

2. As a general rule, any record read by the MONARCH loader can be blocked (see "System Update 
Routine"); a blocked record is identified by the letter B in column 22. Columns 21, 23 and 24 
must be blank. 

3. Columns 25 through 72 may contain comments. In this listing, the comments are program approval 
date, core allocation, and catalog number. The statement — LABEL — in the core allocation 
column indicates the beginning of a logical file. 

4. The four I/O handlers, PRINT, MTAPE, CDRP, and PTYIO, must appear in this order on the system 
tape and must follow immediately after TFMONRCH; i.e., no insertions may be made between any 
two of these subroutines or between TFMONRCH and PRINT. 

5. FORTRAN II is available only on 900 Series Computers. 

6. Any routine or processor that is to go on the system tape should be written prior to the library if it 
has any references to be satisfied from the library. 

7. No programs within the scope of a Al library may have an END card with a transfer address as the 
last card in a binary record. 

8. The ALGOL system is supplied only on specific request. 

9. A double EOF mark is written after SYSEND. 
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APPENDIX C. LOADER OPERATIONS 



A general description of the MONARCH loader is given in Section 3. This appendix explains the main 
features of the loader in greater detail. 

RELOCATION AND DATA RECORDS 

A data record (record type 0) contains instructions and/or data to be stored in memory by the loader. 
Each data record contains a load address which is either the relative or absolute memory location in 
which the first data word (an instruction or a constant) is to be stored. The word in the data record 
containing the load address also contains an indicator that specifies whether or not the current load 
relocation bias is to be added to the given load address to obtain an effective load address. In other 
words the indicator specifies whether or not the data record contains relocatable words. 

The effective load address determines the location in which the first data word is stored; successive 
data words are then stored in consecutive memory locations following the first word. 

Relocation is performed according to the type of record being loaded. Four types of relocation are 
possible; these are described below. Record types are explained in Appendix F, "XDS Standard Binary 
Language. " 

LOAD RELOCATION 

If the load relocation indicator is "set" for a given data word, the initial contents (i) of the rightmost m 
bits in that data word are replaced with k where: 

k = (i +b) modulo 2 m 

m = 14 for XDS 900 Series Computers 

= 15 for XDS 9300 Computers 
b = current value of load relocation bias 

COMMON RELOCATION 

If the blank COMMON relocation indicator is "set" for a given word, the initial contents of the 
rightmost m bits in that data word are replaced by k where: 

k =(b +c) modulo 2 m 

m = 14 for XDS 900 Series Computers 

= 15 for XDS 9300 Computers 
c = current value of COMMON relocation bias 
b = current value of load relocation bias 

PROGRAMMED OPERATOR RELOCATION 



If the POP relocation indicator is "set" for a given data word, the initial contents (n) of bits 3 through 
of that data word are replaced by p where: 

p = operation code from POP table entry number n 
(p>0) (0<n <77 8 ) 

Note: n is the "relative" POP operation code and p is the effective POP operation code computed by 
the loader. 
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SPECIAL I/O RELOCATION 

If the special I/O relocation indicator is "set" for a given data word, the following modifications are 
performed: 

1. The rightmost m bits of d are replaced with k and the result is stored in a . 

2. Bit 18 of the contents of a -b is replaced with 6 and the result stored in a -b. 

where: 

d = initial value of the data word 

a = effective load address of d 

i = initial value of rightmost m bits of d 

b = current value of load relocation bias 

m = 14 for XDS900 Series Computers 

= 15 for XDS 9300 Computers 

k = (i +b) modulo 2 m 

6 = bif (i +b)>2 m or0if (i +b)<2 m 

EXTERNAL LABEL REFERENCES AND DEFINITIONS 

The loader is capable of handling (resolving) symbolic cross-references between separately assembled 
and/or compiled programs. External reference and definition items in binary records (type 1 records) 
provide the loader with the information needed to link together two or more separately assembled or 
compiled programs. 

During the loading process, the loader maintains a (symbol) table of external label definitions and unsat- 
isfied external references. There is no restriction on the order in which the definition of a label and the 
reference(s) to it appear in the input to the loader. The definition of a label may precede, or follow, 
some or all of the references to it. Note that it is permissible for any number of programs to contain 
references to a given label, provided that one program being loaded contains an external definition item 
for that label. 

When the loader encounters an external definition item, it searches the symbol table for a previous defi- 
nition of that label in the table; if there is one, the loader increments the duplicate definition counter 
and discards the new definition. If the search reveals that the label is already in the table as an un- 
satisfied reference, the loader uses the definition to satisfy all the references to that label and replaces 
the unsatisfied reference item in the table with the definition item. However, if that label does not 
occur in the symbol table (as a reference or as a definition), the loader inserts the external definition 
item in the symbol table. 

The operand field of an instruction which references an external label requires special consideration. At 
the time of assembly, the operand field in this case will contain either zero or the relative address (in the 
same program) of the previous instruction which referenced that same external label. 

A typical assembly containing references to an externally defined label EXLABL might appear: 



*01002 07600000 LDA EXLABL 



*01 172 23501002 STA EXLABL, 2 



*01205 07701172 EAX EXLABL 

END 
EXLABL 1205 
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At load time the loader uses the relative address (1205) of the last instruction containing a reference 
to EXLABL to down-chain (i.e., chain back through) the program (to 1172, to 1002), thus determining 
all instructions that reference EXLABL. The zero address portion of the instruction at 1002 indicates 
to the loader the end of the chain in that program. 

Use of EXLABL + 2 in a source program could cause the loader to chain back to the wrong instruction, 
and for that reason external labels cannot be modified in this way at assembly time. However, since 
indexing and indirect addressing are modifications occurring at execution time, they are legal with 
externally defined labels. For example, to access the locations EXLABL and EXLABL + 1 (EXLABL 
externally defined), the following technique might be used. 



The code: 



would be equivalent to: 



TEMP 



EAX 


EXLABL 


LDA 


0,2 


STA 


TEMP 


LDA 


1,2 


STA 


TEMP + 1 


RES 


2 



LDA 


EXLABL 


STA 


TEMP 


LDA 


EXLABL + 1 


STA 


TEMP + 1 



END 



When the loader encounters an external reference item, it searches the symbol table to see if it already 
contains an external reference item for that label; if so, the external reference chain associated with 
the new external reference item is "linked" to the external reference chain associated with the existing 
tabie entry and the new external reference item is discarded. If the search reveals that the label is 
already included in the table as an external definition, the loader uses the definition to satisfy all the 
references to that label and then discards the external reference item. However, if that label does not 
occur in the symbol table (as a reference or as a definition), the external reference item is inserted in 
the symbol table; to be satisfied by a later definition. 

EXTERNAL PROGRAMMED OPERATOR REFERENCES AND DEFINITIONS 

The loader is capable of satisfying references to internal and external Programmed Operator (POP) defi- 
nitions. External POP definition items, external reference items, and internal POP definition items 
provide the loader with the information needed to: 

1. Satisfy external and internal POP references. 

2. Maintain external POP reference and definition items in the loader's symbol table. 

3. Construct a Programmed Operator transfer table in cells 0100 ft through 01 77 ~. 

An "internal" POP definition is one that is recognized only within the scope of the program in which 
it occurs. No entries are made in the loader's symbol table for internal POP definitions or references. 

Many of the loader functions performed in the processing of external POP references and definitions are 
also performed (by the same loader subroutines) for external label references and definitions. In parti- 
cular, the functions of insertion and replacement of symbol table entries and the handling of duplicate 
definitions are the same both for external label and external POP items. 

An internal POP definition supplies the loader with the (relative) sequence number that appears in bits 
3 through 8 of data words referencing that POP and the address of the origin of the POP subroutine which 
corresponds to that sequence number. The loader assigns a new sequence number X (0 - X £ 77 ~) which 
it will use to replace bits 3 through 8 of all data words containing references to that POP definition. 
The loader also stores the address of the POP subroutine in the address field of cell X + 100~. The 
reason for assigning new sequence numbers is to avoid possible conflicts with sequence numbers assigned 
in other, separately assembled (or compiled) programs that are aiso being loaded. A given POP 
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mnemonic (e.g., FLA) will be given a unique sequence number during loading, so any reference fo FLA 
will "quote" this sequence number. It should be noted that the method depends on the assignment of 
sequential numbers, beginning with zero, to each different POP reference or definition in a given 
program. 

The primary difference in the treatment of internal and external POP definitions is that the external POP 
definition is represented in the loader's symbol table and hence it is recognized as a definition in all 
programs being loaded, not just the one in which it occurred. All of the remarks in the preceding para- 
graph relating to internal POP definitions apply equally to external POP definitions. 

External POP reference items are inserted in the symbol table if no matching definition is found as a 
result of the symbol table search. When a matching external definition is supplied, the operation code 
assigned by the loader and the POP subroutine address are used by the loader to satisfy the reference. 
The POP operation code (X) replaces bits 3 through 8 of all data words containing references to that 
POP, and the POP subroutine address replaces the contents of the address field of cell X + 10CL. (See 
Programmed Operator Technical Manuals.) 

SYMBOL TABLE ITEM FORMAT 

Each item in the loader's symbol table consists of a two-word symbol followed by a one-word value. 
The symbolic portion of a symbol table item consists of from one to eight alphanumeric characters, 
left justified within two computer words. Unoccupied character positions contain blanks (060). 

The value portion of a symbol table item may be one of seven types. In each case, the left-most 9 
bits identify the type and the right-most 15 bits contain the value. 



ST 


C 


L 


M 


V 



1 2 



7 8 9 10 



23 



ST = Subtype 

C = Code 

L =0 for label items 

= 1 for POP items 

M = no doubly defined symbol 

= 1 doubly defined symbol 

V = Value 

Internal POP definition 






POP Sequence No. 


1 


POP Subroutine Origin 


1 


2 7 


8 


9 




23 



Common or Program Length 






c 


L 


Length of Program/COMMON Block 



1 2 



7 8 9 



23 



C = 1 if V contains program length 

L = 1 if V contains length of labeled Common 
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External Label Reference 



1 








Last Reference Address 


1 


2 7 


8 


9 23* 



External Label Definition 



1 








Label Value 


1 


2 7 


8 


9 23 



In the 900 Series MONARCH loader, bit 9 of the value word for a given entry in the symbol table is set 
to a 1 bit if the external definition associated with that entry has a duplicate definition. In the case 
of the 9300 MONARCH loader, bit 5 is of the value word is set to a 1 bit. 

Labeled Common Reference 



1 1 








Last Reference Address 



1 2 



7 8 9 



23 



External POP Reference 



1 


6-Bit Op Code 


1 






1 2 



7 8 9 



23 



External POP Definition 



1 


6-Bit Op Code 


1 


POP Subroutine Origin 


I 


2 7 


8 


9 23 



In the 900 Series MONARCH loader, bit 9 of the value word for a given entry in the symbol table is 
set to a 1 bit if the external definition associated with that entry has a duplicate definition. 

Note: Items whose subtype is 00 are not entered in the table. POP items whose subtype is 11 are not 
entered in the table. 

The origin of the POP subroutine is stored in the address field of the actual POP transfer table entry, 
at X + 100g, when a POP definition is encountered. The actual 6-bit POP address (X) replaces the 
sequence number when the item is inserted in the symbol table. 

Zero is stored in the address field of the actual POP transfer table entry (X + 100g) when a POP reference 
item is inserted in the symbol table. The actual operation code replaces the sequence number. 

The actual 6-bit POP operation code is also stored in the instruction code field of the POP transfer 
table entry whose address is obtained by adding 1 00_ to the sequence number. 
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APPENDIX D. UPDATING META-SYMBOL ON MONARCH TAPES 



Any portion of META-SYMBOL may be updated using the standard MONARCH ASSIGN, UPDATE, and 
COPY control cards. However, two sections of the system contain more than one deck, and during an 
update all portions of the labeled segment must be updated. These sections are (1) ENCODER (includes 
ENCODER, the proper POP deck, and S4B), and (2) MON1 (includes MON1 followed by the absolute 
loader). 

When modified through reassembly, PREASSEM, SHRINK, ASSEMBLR, and FINISH must be converted 
to absolute form before being placed on the system tape. If the changes are by means of binary patches, 
the patches are inserted at the end of the absolute deck, just preceding the end card. 

If the S4B portion of the ENCODER increases in size by more than a few words, the origin of the tables 
generated by the ENCODER must be changed. To move these tables, reassemble the ENCODER modifying 
the symbol TABLES defined at the end of the ENCODER by an EQU directive. 

If the size of ASSEMBLER increases in size, the constant DTAB in the preassembler must be changed. This 
can be done by inserting a binary patch redefining this constant as needed. DTAB is the origin of the 
encoded dictionary. 

If the size of the MSCONTROL program is increased, it is necessary to reassemble and move everything 
following it including the ENCODER, parts 1 and 2 of PREASSEM, and part 1 of ASSEMBLER. If this 
becomes necessary, the constants CPO, BPO, HED, CSEQ, and CORG must be appropriately redefined 
in both parts of PREASSEM, and the constants LITAB and PACKL must be redefined in part 1 of ASSEMBLER. 
The origins of these programs will also change. 

A more thorough discussion of modification procedures may be found in the META-SYMBOL Technical 
Manual, XDS 900827. It is assumed that anyone attempting source level modification of META-SYMBOL 
will be familiar with that document. 
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APPENDIX E. FORTRAN LINKING 



FORTRAN linking is available only when FORTRAN II is part of the MONARCH operating system. This 
operating system provides a modified Run-Time package, an initialization routine (LINKINIT), an ad- 
ditional subroutine (LINKING) for the FORTRAN library, and an additional control message (FORTLINK) 
for MONARCH. 

FORTRAN linking allows the segmenting of FORTRAN programs and the loading and executing of these 
segments or "links" selectively under program control. A link is made up of a FORTRAN main program, 
subprograms, and FORTRAN library subroutines and functions. The loading of any link automatically 
erases the previous link. Only COMMON, modified FORTRAN Run-Time, and the MONARCH resident 
remain undisturbed during loading of a link. 

Briefly, the FORTRAN linking procedure creates a link by loading a compiled FORTRAN program into 
core with necessary library subroutines and writing this program as an absolute dump preceded by a nu- 
merical identification (ID) on tape. The run-time package is not written on the tape. After all links 
have been written in this manner, each with its own unique ID, LINKZERO is loaded from the system 
tape and scans the linking tape, builds a table of ID's in the order of their appearance on the linking 
tape, inputs an initial list of the linking ID's to be followed at execution time, and executes the first 
specified link. The sequence of links to be executed is determined from CALL statements in the FORTRAN 
program (e.g., CALL LINK (N), CALL NEXT LINK, etc.). 

Links may be written onto a separate magentic tape or onto the MONARCH system tape itself. Links 
may also be written on the X2 disc file instead of tape, in which case the ID's will be placed in the 
Directory disc file. 

LINK PROCESS 

Each of the various links in a chained program is a complete FORTRAN main program using any FORTRAN 
subprograms and library subroutines required. When control is passed from one link to another, the new 
link completely destroys the old one and execution begins at the first executable statement of the new 
main program. Only variables in COMMON are passed from one link to another. Care should be ex- 
ercised that no link is large enough to overlay the COMMON from a previous link that may be needed 
by a following one. The easiest way to assure this is to reserve the same amount of COMMON in each 
link. 

After all the desired links have been stored on magnetic tape or on the X2 disc file, a chaining sequence 
is initiated by requesting LINKZERO (i.e., via a LOAD 0, GO, 'LINKZERO' message). LINKZERO is 
loaded complete with a modified Run-Time package and the linking routine. The modified Run-Time 
package remains in memory to be used by succeeding links; the other links do not have Run-Time associ- 
ated with them. LINKZERO determines the initial sequence of links to be performed and calls the first 
one into memory. The linking routine contains a push-down list of link numbers. Statements are pro- 
vided for adding and removing links from the list and for calling them into memory. Any link may use 
the following statements: 

1. CALL LINK (3) 

Call in link number 3. (The ID number for a link may be any three decimal digits.) The actual 
procedure here is to put 3 at the top of the push-down list and then call that link, which re- 
moves the number from the list. 

2. CALL LINK (integer variable) or CALL LINK (integer expression). 

3. CALL LINK (expression 1, expression 2, ..., expression n). 

Compute the n expressions (where n has a maximum value of 30) and place the resulting numbers 
at the top of the push-down list so that they will be called in the order 1, 2, . . ., n before 
calling whatever was on the list previously. Note that 2, above, is a special case of this. 
Zero is a legitimate link number and, when called, causes a return to MONARCH. 
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4. CALL LINK (-2) 

Remove the top two items from the push-down list. Do not call any link but proceed to the 
statement following the call. 

5. CALL LINK (negative expression 1, expression 2, expression 3, . .., expression n) 

If the first number is negative, remove the appropriate number of links from the push-down list 
before proceeding to enter the following numbers. Then call the link specified by expression 2. 
Only the first number may be negative. An error message (NEC ARG) will result if any others 
are negative. Note that 4, above, is a special case of this. 

6. CALL NEXT LINK 

Call the link specified by the top number in the push-down list and remove that number from 
the list. If the list runs out of numbers, control is returned to MONARCH. 

No parameters are used following CALL NEXT LINK. If present, they are ignored. 

7. CALL FILL LINK (expression 1, expression 2, ..., expression n) 

Compute the n expressions, place the resulting numbers at the top of the push-down list, and 
return to the calling program. 

When a link is called, it always begins at the first executable statement. However, one can effectively 
make it start at any number of places by providing a transfer instruction as the first executable statement: 

1. Label the appropriate statements (e. g. , 16, 2, 19). 

2. As the first statement in the link, write a computed GO TO statement which references a loca- 
tion in COMMON; e.g., GO TO (16, 2, 19), I where I is in COMMON. 

3. In the calling program prior to the CALL LINK statement, set the COMMON location (i.e., I) 
equal to the value of the desired label (in this example, I would be set to 1, 2, or 3). 

GENERATING A LINK TAPE / LINK FILE ON DISC 

LINKINIT is used to initialize a link file (X2). When X2 follows the system, which is the case when 
X2 is assigned to the same device (MTO for Tape MONARCH and DF for RAD MONARCH) calling 
LINKINIT will result in the removal of any previous links from the link file. 

The MONARCH control message FORTLINK has the format 

AFORTLINK P.,P ....,P . 
12 o 

P. The identification number to be assigned to the link about to be written on magnetic tape or 

disc, may be any three decimal digits. 

p_ Same as P. for FORTLOAD. 

The FORTLINK control message causes MONARCH to load and transfer control to the FORTRAN loader, 
which in turn loads a FORTRAN-compiled program and produces a storage map and/or label map as 
specified by the parameters ?2 through Pq. Then that FORTRAN-compiled program is written onto the 
link tape or disc as link number P... The links do not have to be written numerical sequence. 

The program always uses X2 as the link tape; therefore, X2 must be assigned to a magnetic tape unit 
before MONARCH encounters the FORTLINK control message. X2 may be assigned to any tape unit 
including the MONARCH system tape. Alternately, X2 may be assigned to the disc. 

The links themselves consist of two records. The first record is a 10-word record containing the link 
number. The second record is the core dump of the FORTRAN program. The core dump does not include 
the FORTRAN Run-Time package. 

If the links are written on the X2 disc file, the first "record" consists of just 2 words: the program 
origin and the number of program locations (from origin to beginning of erasable storage). 

When completed, the linking tape will consist of: an end-of-file mark, a short record and a long record 
for the first link, a short record and a long record for the second link, etc., and then finally another 
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end-of-file mark. It makes no difference whether the link tape is the system tape or a separate scratch 
tape. As far as the operation and execution of a linked program is concerned, the links are bracketed 
by end-of-file marks. 

If the links are written on the disc, the link ID entries, automatically placed in the disc directory, 
render end-of-record and end-of-file marks unnecessary. 

EXAMPLES 

Example A: 

AASSIGN X2=MT3W, BI=MT0W. 
ALOAD 0, GO, 'LINKINIT'. 
AASSIGN X1=PR1W. 
AFORTLINK29, MAP, XI. 
AFORTLINK 16, XI, XI. 

The link tape is to be on magnetic tape unit 3. The binary input is from the system tape. The LOAD 
control message causes the linkage initialization routine LINKINIT to be loaded. Magnetic tape 3 is 
rewound, two end-of-file marks are written on it, and the tape is rewound again. Control is then 
transferred to MONARCH, which makes the new unit assignment for XI and loads the FORTRAN loader. 

The FORTRAN loader loads the previously compiled FORTRAN program from the paper tape reader and 
produces a storage map of the program. The library is loaded from the system tape and the message 
"LOADING COMPLETE ..." is typed. Next, magnetic tape 3 (i. e. , the link tape X2) is scanned for- 
ward to the second end-of-file mark; the tape is then backspaced over this end-of-file mark. The 
FORTRAN program, which was just loaded, is written onto the tape as link number 29, another end-of- 
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control is returned to MONARCH. 

The effect of the second FORTLINK control message is similar to that just described except that no map 
is produced and the previously compiled programs are on two separate pieces of tape (possibly a main 
program and a function). After the programs are loaded and the message "LOADING COMPLETE ..." 
is typed, magnetic tape 3 is again scanned forward to the second end-of-file mark; the tape is back- 
spaced over this end-of-file mark. Then the FORTRAN program just loaded is written onto the tape as 
link number 16, another end-of-file mark is written, and the tape is rewound. 

This process can continue until all the links have been written on tape. There is no restriction on the 
links except that no two links may have the same identification number. 

Example B: 

AASSIGN X2=MT0W, BI=MT0W. 
ALOAD 0, GO, 'LINKINIT'. 
AASSIGN X1=PR1W. 
AFORTLINK 17, MAP, LMAP, XI. 
AFORTLINK 169, XI, X1U. 

In this example the system tape is to be used as the link tape. After the linkage initialization routine is 
loaded, the system tape is scanned forward to the first end-of-file mark, and a second end-of-file mark 
is written. Then the system tape is rewound, and control is transferred to MONARCH, which makes the 
new unit assignment for XI and loads the FORTRAN loader. 

The FORTRAN loader loads the previously compiled FORTRAN program from the paper tape reader, loads 
the library routines from the system tape, and produces a storage map and a label map. After the mes- 
sage "LOADING COMPLETE ..." is typed, the system tape is scanned forward to the second end-of- 
file mark and backspaced over this end-of-file mark. The just-loaded FORTRAN program is written onto 
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The message "LINK WRITTEN ON TAPE" is typed, and control is transferred to MONARCH. 
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The effect of the second FORTLINK control message is similar to that just described except that the 
previously compiled programs are on two separate pieces of paper tape. The second piece of tape is 
to be read unconditionally. After the programs and library subroutines are loaded, the message 
"LOADING COMPLETE. . . " is typed. The system tape is again scanned forward to the second end- 
of-file mark and backspaced over it. Then, the just-loaded FORTRAN program is written onto the 
system tape as link number 169, another end-of-file mark is written, and the system tape is rewound. 
The message "LINK WRITTEN ON TAPE" is typed, and control is transferred to MONARCH. 

This process may continue until all the links have been written on the system tape. 

Example C: 

AASSIGN X2=MT2W, BI=MT0W. 

ALOAD 0, GO, 'LINKINIT'. 

AASSIGN SI=PR1W, BO=MTlW, LO=LPlW. 

AREWIND MT1W. 

AFORTRAN LO, BO. 

AREWIND MT1W. 

AASSIGN BI=MT1W. 

AFORTLINK 2, BI. 

AREWIND MT1W. 

AFORTRAN LO, BO. 

AREWIND MT1W. 

AFORTLINK 4, MAP, LMAP, BI. 

In this example magnetic tape 2 is the link tape. The binary input is from the system tape to enable 
the loader to load the link initialization routine. The link tape is rewound, two end-of-file marks 
are written, and the tape is rewound again. Then control is transferred to MONARCH, which makes 
the unit assignments for the SI, BO, and LO units and rewinds magnetic tape 1. 

Next the FORTRAN compiler is brought into core. The compiler accepts the source input from the 
paper tape reader, compiles the program, produces a listing on the line printer, and writes the com- 
piled program onto magnetic tape 1. Then control is returned to MONARCH, which rewinds mag- 
netic tape 1 and makes a new unit assignment for the binary input unit. 

The FORTRAN loader is brought into core, and it loads the previously compiled program from magnetic 
tape 1. After the program and any necessary library subroutines have been loaded, the message 
"LOADING COMPLETE. . . " is typed. Next, the link tape is scanned forward to the second end- 
of-file mark and backspaced over it. Then, the just-loaded program is written onto tape as link 
number 2, another end-of-file mark is written, and the tape is rewound. Control is transferred to 
MONARCH, which rewinds magnetic tape 1 and calls in the FORTRAN compiler again. 

The compiler accepts the second source program from the paper tape reader, compiles it onto mag- 
netic tape 1, and produces a listing on the line printer. Then control is returned to MONARCH 
which rewinds magnetic tape 1 and calls in the FORTRAN loader. 

The FORTRAN loader loads the compiled program from magnetic tape 1. The link tape is scanned 
forward to the second end-of-file mark and backspaced over this mark. Then the just-loaded pro- 
gram is written onto the link tape as link number 4, another end-of-file mark is written, and the 
tape is rewound. 
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EXECUTING A LINKED PROGRAM 

Execution of a linked program is initiated when the routine LINKZERO is called into core via a LOAD 
control message. The LINKZERO routine 

1. Scans the link tape to determine how many links are present and the order in which they 
appear on the tape and to record the identification numbers (link numbers) of the first 
thirty links. 

2. Positions the tape between the two end-of-file marks that define the beginning and end of the 
link tape. 

3. Stores information indicating the order in which the links are to be executed. 

4. Locates the link to be executed first, loads it into core, and transfers control to it. 

During the execution of the user's program, the links are located on the link tape by one of two methods: 

1. If the link is one of the first thirty on the tape, its location will be known, and it can be lo- 
cated and read into core directly. 

2. If the link is not one of the first thirty, its location is unknown; therefore, the link tape is 
positioned in front of the first link and is scanned forward until the desired link or an end-of- 
file mark is found. 

If the link cannot be found, an error message (EOF STOP) is typed, and the computer halts. The link 
number for which the search was unsuccessful is displayed in the A register. 

Example: 



AASSIGN X2=MT2W, BI-MTOW, SI=TY1W. 
ALOADO, GO, 'LINKZERO'. 

After LINKZERO is loaded into core, the message "LINKZERO LOADED" is typed. The link tape X2 
is scanned forward to the first end-of-file mark. The tape is then read to determine the order of the 
first thirty links. This information is stored in a 30-word table. (More than thirty links may be written 
on the tape, but only the first thirty identification numbers are stored in the table.) After this informa- 
tion is stored, the tape is positioned in front of the first link on the tape. From this point on, the tape 
remains positioned between the two end-of-file marks that delimit the links. 

LINKZERO then accesses whatever symbolic input device has been assigned — in this example, the 
typewriter. The user enters the list of link numbers in the order in which the links are to be executed. 
(Links may be executed any number of times and in any sequence.) This information is stored in a sec- 
ond 30-word table. The list of link numbers is entered under FORTRAN FORMAT (14). The user must 
enter at least one link number; a maximum of thirty may be entered. (This feature enables the user to 
specify the first link and then have the links executed under program control; i.e., the first link calls 
another link which calls another, etc.; or the user may specify, via the input device at execution time, 
the order in which the links are to be executed, and each link is written to call the "next" link rather 
than a specific one.) The first link number entered by the user will be the first link executed. 
LINKZERO locates this link on the link tape, loads it into core, and transfers control to it. 

If the links are written on the disc, they decrease available disc storage. To free this storage space, 
another A LOAD 0, GO, 'LINKINIT' control message should be used, at the completion of the 
link job. 
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APPENDIX F. XDS STANDARD BINARY LANGUAGE 



The following description specifies a standard binary language for XDS 900 Series and 9300 Computers. 
The intention has been that this language be both computer-independent and medium-independent. Thus, 
the language provides for handling Programmed Operator definitions and references even though the 9300 
does not have this hardware feature; similarly, there is a provision for relocation relative to blank 
COMMON, even though this requirement is not present in XDS 900 Series FORTRAN II. 

In the following description of the language, a file is the total binary output from the assembly/compi- 
lation of one program or subprogram. A file is both a physical and a logical entity since 't can be sub- 
divided physically into unit records and logically into information blocks. While a unit record (in the 
case of cards) may contain more than one record, a logical record may not overflow from one unit record 
to another. 



1 . CONTROL WORD - first word in each type of record 



Type (T) 


1 


Word Count (C) 


Mode 
(Binary) 


Folded Checksum (FC) 









101 




2 


3 


4 8 


9 11 


12 




23 



Field 

Contents 
Bit Number 



000 
001 
010 
011 
100 



Record Type 

Data record (text) 

External references and definitions, block and program lengths 

Programmed Operator references and definitions 

End record (program or subroutine end) 



Not assigned 
111 J 

C = total number of words in record, including Control Word 

Note that the first word contains sufficient information for handling these records by routines other 
than the loader (that is, tape or card duplicate routines). The format is also medium-independent, 
but preserves the Mode indicator positions desirable for off-line card-handling. 

An exclusive OR checksum is used. If the symbol — is used to denote exclusive OR, and W. denotes 



the i-th word in the record (1 



C), then 



FC=(W,) . 11 -(S)-(S)- 07777 



/here 



W -- W. -- ... — W 
2 3 c 



2. DATA RECORD FORMAT (T=0) 
Word 1 



Control 
Word 



Record 
Type CD 



I 



000 



1 



2 3 4 



3 2 c * 30 



Mode 
(Binary) 



101 



Folded Checksum 



8 9 



11 12 



23 
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Load 

Address 

Word 



Word 2 












77) 

1 


Data Word 
Modifiers (M) 


Load Address 
Modifiers (A) 




Load Address (Re 


arive or Absolute) 













V 


1 4 


5 8 


9 






23 



The presence of bits in field M indicates the presence of words n + 3, n + 4, n + 5, and n + 6 (shown 
below): 

If bit position 4 contains a 1, word n + 3 (load relocation), is present. 

If bit position 3 contains a 1, word n + 4 (common relocation) is present. 

If bit position 2 contains a 1, word n + 5 (POP relocation) is present. 

If bit position 1 contains a 1, word n + 6 (special I/O relocation) is present. 



Word 3 



Data 
Word 1 



Instruction or Constant 





Words 3 through n + 2 contain instructions or constants (where 1 < n ^ 24) 
Word n + 3 



23 



Load 
Relocation 



Load address relocation word (present iff (M) n 1=1) 



23 



Word n + 4 



Common 
Relocation 



Blank common relocation word (present iff (M) 0. 2=2) 









23 



Word n + 5 



Programmed 

Operator 

Relocation 



Programmed operator relocation word (present iff (M) n 4=4) 









23 



Special 

I/O 

Relocation 



Word n + 6 






Special Input/Output operation relocation (present iff (M) n 8 = 


8) 











23 



Words n + 3 through n + 6 are modifier words. Each bit in each of these words corresponds to a data 
word; that is, bits through 23 of each modifier word correspond to data words 3 through n + 2 
(where 1 s n ^24). A bit set to 1 in a modifier word indicates that the specified data word requires 
modification by the loader. There are four types of modification (and hence four possible modifier 
words) which are indicated in data records. Presence of a modifier word in a data record is indi- 
cated by the M (data word modifier) field in the load address word. 
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The load address is subject to modification as indicated by the A field of the load address word as 
follows: 

(A) = 0, absolute. 

(A) 1=1, current load relocation bias is added to load address. 

(A) n 2 = 2, current common relocation bias is added to load address; 

the remaining bits of A are unassigned. 
(A) = 3, illegal. 

3. EXTERNAL REFERENCES AND DEFINITIONS, BLOCK AND PROGRAM LENGTHS (T = 1) 
(Includes labeled COMMON, blank COMMON and program lengths) 



Control 
Word 



Word 1 



Record 
Type (T) 


// 
% 


4^ C< 31* 


Mode 
(Binary) 


Folded Checksum 


001 







101 




2 


3 


4 8 


9 11 


12 




23' 



From 1 to 10 items per record 



Common 

Length 

or Program < 

Length 

Item 



1- to 8-Character La 


Del 


















CI 


C2 


C3 


C4 


C5 


C6 


C7 


C8 


5 


6 




11 


12 




17 


18 




23 



Length Word 



Item 
Type 


i 


« 


i 


B 


C 


Length of Program or Common Block (L) 


00 


00000 








1 


2 




6 


7 


8 


9 




23 



B = 1 if (L) is program length 

C = 1 if (L) is length of a labeled common block 



External 
Reference * 
Item 



1- to 8-Character La 


bel 


















CI 


C2 


C3 


C4 


C5 


C6 


C7 


C8 


5 


6 




11 


12 




17 


18 




23 



Chain Word 



Item 
Type 


W/A 


Address Mod- 
ifiers (A)** 


Address of Last Reference 


01 


000 







^ 12 4 5 8 9 

** See data record, load address word, for interpretation. 
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External 
Definition i 
Item 



1- to 8-Character Label 


















CI 


C2 


C3 


C4 


C5 


C6 


a 


C8 


5 


6 




11 


12 




17 


18 




23 



Value Word 



Item 
Type 


WM. 


Address Mod- 
ifiers (A)** 


Absolute or Relocatable Value 


10 


000 







1 2 



4 5 



8 9 



See data record, load address word, for interpretation 



23 



External symbolic definitions include subroutine "identification" as a subset and require no special 
treatment of subroutines with multiple names. 



r 


1- to 8-Character La 


Del 




















CI 


C2 


C3 


C4 


C5 


C6 


C7 


C8 




5 


6 




11 


12 




17 


18 




23 



External 

Reference 

with 

Addend 

Word* 



Chain Word 



Item 
Type 



7T7777777, 



ll 



ooo 



Address Mod- 
ifiers (A)** 



Address of Last Reference 



12 4 5 

Addend Word 



8 9 



^0 



8 9 



* One of these items for each unique reference; e.g., each of the following 
references is represented by a separate item: 

A + 5, B + 5, B + 6, C+2, C+5 
** See data record, load address word, for interpretation. 

4. PROGRAMMED OPERATOR REFERENCES AND DEFINITIONS (T = 2) 

Word 1 
Control 
Word 



23 



W/////////////////////M 


Value of Addend 


000 000 000 





23 



Record 
Type (T) 


1 


4 <C <31** 


Mode 
(Binary) 


Folded Checksum 


010 







101 




2 


3 


4 8 


9 11 


12 




23 



From 1 to 10 items per record 
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Internal 

Programmed 

Operator 



1- to 8-Character Mnemonic 



CI 


C2 


C3 


C4 


C5 


C6 


C7 


C8 







5 


6 




11 


12 




17 


18 




23 



^ 



Item 
Type 



00 



Sequence No. 



1 2 



Origin of Programmed Operator Routine 



7 8 9 



23 



Programmed 4 

Operator 

Reference 



1- to 8-Character Mnemonic 



^ 12 



7 8 9 



CI 


C2 


C3 


C4 


C5 


C6 


C7 


C8 


5 6 11 


12 17 18 23* 


Item 
Type 


Sequence No. 


R 


W//////////////////////////////////////////A 


01 







000 000 000 000 000 



23 



External 
Programmed 
Operator 
Definition 



1- to 8-Character Mnemonic 


















CI 


C2 


C3 


C4 


C5 


C6 


C7 


C8 


5 


6 




11 


12 




17 


18 




23 



Item 
Type 


Sequence No. 


R 


Origin of Programmed Operator Routine 


10 




1 




1 


2 


7 


8 


9 




23 



R = 1 if origin of Programmed Operator Routine is relocatable. 

The sequence number indicates the order in which the definitions or references occurred 

in the source program. 

5. END RECORD (T = 3) 

Word 1 
Control 
Word 



Length of 
Program 



1 4 5 8 9 

** See data record description for interpretation. 



Record 
Type (T) 


i 


2<C ^4 


Mode 
(Binary) 


Folded Checksum 


on 







101 




2 3 
Word 2 


4 8 


9 11 


12 


23 


i 


Transfer Word 

Modifiers 

(M)* 


W/////A 


1 + Maximum Value of Location Counter 







0000 





23 
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Word 3 



W////A 


"BRIT 


Transfer Address 


000 


000001 





Transfer 
Word 



2 3 8 9 23 

This may be followed by a relocation word as described above in "Data Record Format, " paragraph 2. 
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APPENDIX G. PROCESSOR DIAGNOSTICS 



This summary of processor errors is provided for convenience of reference. The user should refer to the 
applicable processor reference manual for a more complete discussion. 

META-SYMBOL (900 Series Only] 

The standard abort message is 

META-SYMBOL ERROR xx 
where xx has the following values: 

xx Interpretation 

01 Insufficient space to complete encoding of input. 

02 Corrections to encoded deck but encoded input file is empty. 

03 End of file detected while reading encoded input. 

04 Insufficient space to complete preassembly operations. 

05 Insufficient space to complete the assembly. 

06 Data error. META-SYMBOL does not recognize the data as anything meaningful. 

07 Requested output on a device which is not available. 

08 Corrections out of sequence. 

09 End of file detected by ENCODER when trying to read intermediate tape XI. 

10 Request for non-existent system procedures. 

1 1 Byte larger than dictionary (bad encoded deck). 

12 Not encoded deck. 

13 Checksum error reading system tape. 

14 Preassembler overflow (ETAB). 

15 Not used. 

16 Data error causing META-SYMBOL to attempt to process procedure sample beyond end of table. 
18 Improperly formatted or missing PROC deck series-specification card. 

24 Shrink overflow. 

Errors 05, 06, and 16 are accompanied by a printout that shows the value of certain internal parameters 
at the time of the abort: 

LINE NUMBER yyyyy 

BREAK l yyyyy 

LOCATION COUNTER yyyyy 

upper yyyyy 

LOWER yyyyy 

break yyyyy 

SMPWRD yyyyy 

ltb e yyyyy 1 j i 

IT _. iii ii \ second pass only 

ltbl yyyyy J 

(yyyyy represents the value of the particular item). The last six of these are useful in determining the 
nature of the assembler overflow. 

After the appropriate message has been typed, control is transferred to MONARCH. 
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I/O ERROR MESSAGES AND HALTS 

When an I/O error is detected, a simple message is typed and the computer halts. The message consists 
of a 2-letter indication of the type of error and a 2— digit indication of the I/O device. The letter 
indicators are defined below; the 2-digit number is the unit address number used in EOM selects (see 
applicable computer reference manual). The action taken if the halt is cleared depends upon the type 
of error and the device involved. There are three types of error. 

BUFFER ERROR (BE) 

1. Examples: 

BE 11 buffer error while reading magnetic tape 1. 
BE52 buffer error while writing magnetic tape 2. 

2. Action upon clearing the halt: 

a. Magnetic tape input - since ten attempts are made to read the record before the halt occurs, 
continuing causes META-SYMBOL to accept the bad record. 

b. Paper tape or card input - try again. 

c. Magnetic tape output - try again. 

d. Output other than magnetic tape - continues. 
CHECKSUM ERROR (CS) 

1. Examples: 

CS06 checksum error card reader. 

CS11 checksum error reading magnetic tape 1. 

2. Action upon clearing the halt: 
Accepts bad record. 

WRITE ERROR (FP) 

1. Example: 

FP12 magnetic tape 2 file protected 

2. Action upon clearing the halt: 
Checks again. 

SYMBOL 

Input/output errors during a SYMBOL assembly result in a typed error message stating the logical file 
(e.g. SI) and the cause for alarm (ER or FP). Halts will occur after the message has been typed only 
in the cases listed below. An erroneous magnetic tape input record is accepted by SYMBOL. 

1. File-protected magnetic tape of RAD file (output) —Clearing the halt will result in another attempt 
to write the record. 

2. Paper tape reader symbolic input error —To reread the record one must reposition the paper tape 
and clear the halt; otherwise, the erroneous record is lost. 

3 = Card reader inout error — clear the halt. Unless the card is repositioned in the reader the record 
is lost. 
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RAD saturation can occur when the disc is unable to accept either a symbolic input record during 
SYMBOL'S pass one or a binary output record during pass two. If overflow occurs, the file manage- 
ment routine types an appropriate message and control is returned to MONARCH. 

FORTRAN II (900 Series Only) 

Both the FORTRAN II compiler's input/output error messages and the FORTRAN loader's error messages 
are listed here. 

I/O ERROR MESSAGES 

For input and output, FORTRAN uses MONARCH'S I/O handlers. If an error occurs during input or 
output, the compiler produces an error message of the form 

FORTRAN I/O ERROR x 

x Interpretation 

1 An error has been detected during listing. Compilation continues. 

2 An error has been detected while reading magnetic tape. The message is output after ten 
unsuccessful read attempts. Compilation continues using the result of the last read. 

3 An error has been detected while punching or writing the object program. Output is sup- 
pressed, and compilation continues. 

4 No input device has been assigned. This is an irrecoverable error, and control is transferred 
to MONARCH. 

5 RAD saturation has occurred. Compilation continues after the processor error switch is set. 

These messages are printed on whatever listing device has been assigned. If no listing device has been 
assigned, the messages are not printed, but the indicated action is still performed. 

There are three halts in the compiler. All display a flagged NOP in the C register with either a 7 ft or 

70 o as an address, 
o 

Address Interpretation and Action 

7 The computer will halt before reading paper tape for the first time, when a stop code 

has been read, or when the tape gap has been detected. Clearing the halt will allow 
compilation to continue. 

70 An error has been detected while reading cards or paper tape. Clearing the halt will 

allow compilation to continue. 

FORTRAN II LOADER ERROR MESSAGES 

The error messages of the FORTRAN II loader running under MONARCH are as follows: 

Message Interpretation and Action 

ERROR SWITCH SET MONARCH is in the job mode (see JOB control message in 

Section 2), and the processor error switch has been set. 
Control is returned to MONARCH, which then attempts to 
read another control message. 



68 



Message 



Interpretation and Action 



PROGRAM TOO BIG 



The program being loaded exceeds available memory. 
Loading continues, assuming an infinite memory. When 
loading is finished, the program size is typed out, and 
control is transferred to the MONARCH bootstrap. 



READ ERROR, RELOAD 
LAST RECORD 



ILLEGAL INPUT, RELOAD 
PROGRAM 



The message is typed out, and the computer halts. If the 
input device is the RAD, control returns to MONARCH. 
Otherwise, clearing the halt allows loading to continue. 
This message is caused by: 

1 . Card read error. 

2. Paper tape read error. 

3. Magnetic tape read error (ten attempts have been made 
to read the record). 

4. Disc file read error. 

5. Checksum error. 

This message is typed out, and control is transferred to the 
MONARCH bootstrap. This message can be caused by: 

1. 12 interrupt whiie reading paper tape. 

2. Input that is not a legal subprogram. 

3. FORTRAN program heading improperly blocked. 

4. Number less than 200o or greater than 2443 ass '9 ne d TO 
a system subroutine reference. 

5. Error in checking the sequential block count. 

6. Labeled COMMON which is not accepted by the 
FORTRAN loader. 

7. First word in a record not being a control word. 

8. Type records for POP relocation and special I/O relo- 
cation, type 2 records (POP references and definitions), 
illegal records (types 4 through 7), and external refer- 
ences with addend items which are not accepted by the 
FORTRAN loader. 



EOF STOP 

or 
NO LINK (disc case) 



Can occur only when FORTRAN linking is used (see Ap- 
pendix E). The requested link cannot be found on the 
link tape or on the disc. The computer halts with the link 
number for which the search was unsuccessful displayed in 
the A register. Clearing the halt will cause the search to 
be repeated. 



ILLtUAL INKJI hlLt AbbluNtU 

T/^\ r\TC/~ 



I he message is typed out, and control is transferred to 

ii^ki Anru xl. • - •- i L. . j-I : r? i.r _r 

/v\v_-MN/-\i\v-n . mis rnebbage lb cuuseu uy me spet-i i it-unun ui 

a logical file other than BI to be loaded from the RAD. 
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APPENDIX H. RAD MONARCH 



INTRODUCTION 

RAD MONARCH is a modified version of Tape MONARCH, which is oriented to an XDS 925/930 
computer with a 9367 RAD unit. The concepts are those of Tape MONARCH; i.e., to maximize the 
efficiency of the XDS 900 Series through minimization of interjob overhead, a factor which is in 
proportion to the ratio of peripheral I/O rates to memory cycle time (as job execution time diminishes 
in proportion to memory cycle time, interjob overhead plays an increasingly important role). 

In Tape MONARCH, interjob overhead corresponds roughly to rewinding the system tape and reloading 
the non-resident operating system. In RAD MONARCH, no actual rewind is necessary, since access to 
the operating system is on a random basis. 

USE OF RAD MONARCH 

The generation of a RAD MONARCH system is accomplished in two phases: 

1. The Tape MONARCH system is converted to a RAD MONARCH system by an UPDATE opera- 
tion (this step is unnecessary if begun from a tape-situated RAD MONARCH system). 

2. The resultant NST (New System Tape) is input to a SYSGEN operation that copies the RAD 
MONARCH system onto the RAD. 

At this point, the Tape and RAD MONARCH systems are completely analogous since they are non- 
resident and bootstrapped into memory in between jobs from the medium on which they are resident, 
and control cards are identical except for the unit assignment of logical files to the RAD. For example: 

Tape MONARCH 

A ASSIGN S = MTO, XI = MT1, X2 = MT2, SI = CR, LO = CP, BO = MT3. 
AMETA910 SI, LO, BO 

RAD MONARCH 

AASSIGN S = DF1A, XI = DF1A, X2 = DF1A, SI = CR, LO = LP, BO = DF1A. 
AMETA910 SI, LO, BO. 

The sole difference is that the system (S) is assigned to the RAD and that XI, X2, and BO may be 
optionally assigned to the RAD. In all other respects the cards controlling a job are identical within 
the two systems. Since the XT, X2 and BO (BI) files are treated as sequential, this includes the use of 
REWIND cards wherever they are necessary in Tape MONARCH. 

DIFFERENCES BETWEEN TAPE AND RAD MONARCH 

Tape MONARCH RAD MONARCH 

Residency ^42 locations (approx.) ^653 octal locations (approx.) 

File Access sequential random 

No. Files = no. tapes 4:S, XI, X2, BO/BI 

Sequential Access Time (avg.) 5 ms./record 17.5 ms./sector 

Transfer rate kc. 558.6 kc. 

The primary difference between Tape and Disc MONARCH is that tapes permit variable length record- 
ing, whereas the RAD is read/written by sector. Therefore, a file management package is resident in 
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RAD MONARCH that "buffers" RAD I/O transfers. As a result, the sequential access time to the 
RAD is actually dependent on the ratio of the average record length to the sector size. Moreover, 
RAD MONARCH permits certain files to be accessed on a random basis. In this manner, loading time 
for system processors is reduced to a minimum. 

Organization of RAD Storage 

Example: 

RAD 




BO 



X2 



XT 



CORE X7777 



X6564 



UAT 


(11) 


BAT 


(11) 


BRU 


DUMP (1) 


BRU 


TYPSM(l) 


CAT 


(11) 


FILE POINTERS (12) 


RAD PACKAGE 


BUFFERS 


QBOOT 



Unit Assignment Table 
Business Assignment Table 
Linkage to Memory Dump 
Linkage to Symbol Tbl. Dump 
READ EOM/SKS Table 
File Maintenance Pointers 
RAD File Mgt. Package 
RAD I/O Buffers (3) 
Linkage to Bootstrap 



00000 






BRU QBOOT (1) 
ERASABLE (1) 



RAD storage allocation is based on the concept of two concurrently active files. When the system is 
generated, these are S (the System File itself) and D (the Directory). After the system is generated, 
S and D are closed, and the remaining storage is used for the XI and X2 files. Since X2 and BO (BI) 
are not simultaneously active, they both share the same file; X2 is defined as beginning immediately 
after the BO file. 



GENERATION OF RAD MONARCH 

RAD MONARCH is generated by first bootstrapping the RAD MONARCH tape, and issuing the following 
control messages: 

AASSIGN S = MTO, XI = DFuc, SO = X. 
ASYSGEN N 

This sequence of messages results in the system being read from magnetic tape on channel A and 
written on RAD unit "u", on channel "c", beginning with sector O. N is the number of files dedicated 
to the RAD MONARCH system. A "directory" of level 4 (AT) files is maintained from sector N down- 
ward. The original level 1 records are output on LO (LP or TY). 



Example: 



AASSIGN S = MTO, XI = DF1Y, LO 
ASYSGEN O, 4095. 



LP. 
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The X2 and XI files are then begun following the S and D files. Level 1 identifiers are discarded from 
the output (XI) file during SYSGEN; level 2 records are abbreviated to the first four words. 

When the end of the Old System Tape (OST) is reached, the S and D files are closed, the OST is 
rewound, and control is returned to MONARCH. 

SYSGEN uses the resident RAD package in performing all RAD I/O operations. 

COMMUNICATION WITH THE RAD FILE MANAGEMENT PACKAGE 

The RAD File Management Package is a file-oriented Input/Output Control System (IOCS) that provides 
sequential access up to three concurrently active files (S, XI, and X2). The operations provided are 
Rewind, Open, Close, Read, Write, Write with Verification and Position. 

The calling sequence consists of a BRM followed by a pointer to a file description table: 

BRM *QSYS 

OP FDT 

RETURN ((A) = "NEXT" RAD ADDRESS) 



FDT 



RES 
PZE 
DATA 
DATA 



1 

RECORD ORIGIN (CORE ADDRESS) 

RECORD LENGTH 

LOGICAL FILE NO. 



OP is a pseudo instruction whose value indicates the appropriate file operation. 



0: 


Rewind 


1: 


Open 


2: 


Close 


3: 


Read 


4: 


Write 


5: 


Write with Verification (S and D only) 


6: 


Position 



The first word of the file description table is set by the file management package to indicate abnormal 
conditions as follows: 



Bit No. 

1 
2 
3 
5 



Interpretation 

I/O Transmission error 
EOF (read only) 
Storage overflow (write only) 
File protect (write only) 
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The correspondence between physical and logical files is as follows: 
File No. File 







XI 



2 


X2 


3 


BO/BI 


4 


D 



The file management package behaves as though the RAD were word addressable. For each active file, 
it maintains the "current sector" in core until it has been fully utilized, at which time the buffer is 
emptied/refilled in preparation for the next sector. Since the sectors are ordinarily contiguous, the p-th 
word is located at word r in sector q, where 

p = q*64+r, 0<q< 2047, < r < 63. 

X2 and BO are actually the same file, but are distinguishable from the standpoint of rewind. RAD files 
are similar to tape files and are destructible when rewound, therefore, the same control cards can be 
used for either Tape or RAD MONARCH. SKIPFILE, SKIPREC, BACKFILE and BACKREC are, however, 
not provided for RAD files. 

Each write on XI and X2 is checked for infringement upon the other file (overflow of storage space). 
Both files are rewound between JOBs. 

Since RAD logical files would be expected to begin at a sector boundary only in rare instances, it is 
necessary to open the file prior to recording or writing. For example, if the XT file begins with the 
fourth word in sector 04053q, the file management routine must first transfer sector 04053o to the core 
buffer before reading or writing can commence. 

Similarly, all output files should be closed after the last write operation. The file management pack- 
age automatically opens a file after a rewind operation. 

The write with verification operation is used during SYSGEN to verify, by post-read, every RAD write 
operation. Since the X2 file is not active during SYSGEN, its buffer is used for the post-read opera- 
tion and is compared word-by-word with the contents of the S or D buffer. The user is cautioned not 
to use write with verification, since he might inadvertently affect X2 or BO in doing so. 

The position operation is used by MONARCH to position S randomly, and like the rewind, it is auto- 
matically followed by an open operation. To utilize this option, the contents of A must contain the 
RAD address to which positioning is requested when the file management routine is entered. 

Additional technical information on the File Management Routine may be found in the MONARCH 
Technical Manual 90 06 16. 
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APPENDIX I. XDS CHARACTER CODES 



Characters 


nternal 


Card 


BCD Code on 




Characters 


Internal 


Card 


BCD Code on 


Typewriter 





Printer X 



DS Code 


Code 



Magnetic Ta 
12 


pe 




Typewriter 


Printer 


XDS Code 
40 


Code 
11 


Magnetic Tape 


00 


40 


1 




1 


01 


1 




01 






J 


J 


41 


11-1 


41 


2 




2 


02 


2 




02 






K 


K 


42 


11-2 


42 


3 




3 


03 


3 




03 






L 


L 


43 


11-3 


43 


4 




4 


04 


4 




04 






M 


M 


44 


11-4 


44 


5 




5 


05 


5 




05 






N 


N 


45 


11-5 


45 


6 




6 


06 


6 




06 






O 


O 


46 


11-6 


46 


7 




7 


07 


7 




07 






P 


P 


47 


11-7 


47 


8 




8 


10 


8 




10 






Q 


Q 


50 


11-8 


50 


9 




9 


11 


9 




11 






R 


R 


51 


11-9 


51 


Space 




Blank 


12 


8-2 




12 (c) 






Car. Ret. ! {a) 


,(e) 


52 


1 1 -o (d > 


52 


* or = 




= 


13 


8-3 




13 






S 


S 


53 


1 1 -8-3 


53 


(d or 




1 


14 


8-4 




14 






* 


* 


54 


1 1 -8-4 


54 








15 


8-5 




15 






] 


] 


55 


1 1 -8-5 


55 


> 




> 


16 


8-6 




16 






/ 


/ 


56 


11-8-6 


56 


J 




• 


17 


8-7 




17 






A 


A 


57 


1 1 -8-7 


57 


& or + 




+ 


20 


12 




60 






b 


Blank 


60 


Blank 


20 


A 




A 


21 


12-1 




61 






/ 


/ 


61 


0-1 


21 


B 




B 


22 


12-2 




62 






S 


S 


62 


0-2 


22 


C 




C 


23 


12-3 




63 






T 


T 


63 


0-3 


23 


D 




D 


24 


12-4 




64 






U 


U 


64 


0-4 


24 


E 




E 


25 


12-5 




65 






V 


V 


65 


0-5 


25 


F 




F 


26 


12-6 




66 






w 


w 


66 


0-6 


26 


G 




G 


27 


12-7 




67 






X 


X 


67 


0-7 


27 


H 




H 


30 


12-8 
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Y 


Y 


70 


0-8 


30 


I 




I 


31 


12-9 
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z 


z 


71 


0-9 


31 


Backspace ? 


0) 


,<e) 


32 
33 


12-0 (d > 
12-8-3 




72 
73 






Tab* (Q) 


# c> 


72 
73 


0-8-2 
0-8-3 


32 
33 


Cor ) 




) 


34 


12-8-4 
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% or ( 


( 


74 


0-8-4 


34 


[ 




[ 


35 


12-8-5 




75 






~ 


~ < e ) 


75 


0-8-5 


35 


< 




< 


36 


12-8-6 




76 






\ 


\ 


76 


0-8-6 


36 


* Stop 




* (e) 


37 (b ) 


12-8-7 




77 






M Delete 


* (e) 


77(b) 


0-8-7 


37 


NOTES: 






























(a) 


The charac 


ters ? ! and t are for input only. The fu 


nc 


ions Backspace, Carriage Return, or Tab 


always occur on output. 




(b) 


On the off 


-line paper tape preparation 


unit, 37 


>erves 


as a stop code 


and 77 as a code delete. 








(c) 


The internal code 12 


is written on 


tape 


as a 12 ir 


BCD 


When read, 


this code is a 


ways conver 


ted to 00. 






(d) 


The codes 


12-0 and 1 


1 -0 are generated 


by the cc 


rd 


puf 


ich; however, 


the card read 


er will also accept 12-8- 


-2 for 32 and 






1 1 -8-2 for 


52 to maintain compati 


bility 


with ear 


ier 


systems. 












(e) 


For the 64- 


-character 


printers only 
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APPENDIX J. FORTRAN II RUN-TIME MAGNETIC TAPE OPERATIONS 



Magnetic tape operation statements such as 

READ INPUT TAPE expression, m, list 
and 

REWIND expression 

will refer to logical unit K, where K is the (truncated) value of the expression. 

Before execution of a FORTRAN II program, the logical unit numbers must be assigned to physical 
devices. This is done with ASSIGN control messages as follows: For magnetic tapes, 

AASSIGN LK = P, 
where 

K =0, 1,..., or 7 
and 

P = MT0, MT1,...,MT7, MTOW,..., MTOY,..., or MT7Y. 
For the XI and X2 files on the 

AASSIGN XI = DF, X2 = DF, L6 = XI, 17 = X2. 

Note that the order of assignment is from left to right; that is, XI and X2 are dummy variables, and are 
used only to distinguish between two RAD files. 

The message 

AASSIGN LK =DF 
is always taken as an abbreviation for 

AASSIGN XI = DF, LK = X1, 
where 

K = 0, 1,..., or 7; i.e., without a dummy variable, XI is assumed. 
Thus the above example can be shortened to 

AASSIGN L6 = DF, X2 = DF, L7 = X2. 

The value of K in the system label, LK, corresponds precisely to the value of K in the FORTRAN II 
magnetic tape operation statement such as 

WRITE TAPE K, list 

even when "tape" K has been assigned to one of the disc files. Only the XI and X2 files of the disc 
are available for this application. 

ERROR CONDITIONS 

Figure 4 on the following pages illustrates run-time errors for 900 series FORTRAN II with and without 
RAD, and indicates, for each of the errors, 

message typed 

whether a halt occurs 

cause of the error 

contents of register at time of halt, if such information may be 
useful or if it may be changed before proceeding 

result if program is allowed to continue. 
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Message 


Halt 


Explanation 


AGTO 


X 


Assigned GO TO — Variable never assigned. Variable displayed in X. Result: Branch to 
(effective address determined by variable ) + 1. 


ARGM 


X 


Argument Mode — Argument of wrong mode given to FORTRAN subprogram. Proper mode 
is fixed if A = 0, floating if A = 01000000. Dummy address of argument displayed in X. 
Result: Argument used as if its mode were correct. 


ARGN 




Argument Number — Wrong number of arguments given to FORTRAN subprogram. Result: 
If too many, extra ones ignored. If too few, whatever arguments remain in erasable stor- 
age will be used. 


CARD 


X 


Card "READ CHECK" or "FEED CHECK" error - If "READ CHECK" light is on, the last 
card read was in error. Place it back in the hopper. If "FEED CHECK" light is on, the 
offending card is still in the hopper. It probably has a wrinkled leading edge. Result: 
Try to read the card again. 


CGTO 




Computer GO TO — Value outside allowable range. Result: Go to first statement number 
in list. 


CRDS 




Card Reader Not Ready — Program has waited 15 seconds for reader. Place cards in reader 
and press start. Result: Program continues to wait for reader. Typeouts occur in 5-minute 
intervals. 


EFIA 




E, F, I, or A Needed in FORMAT — Unable to output variables. Result: Proceeds without 
outputting variables. 


EIOL 


X 


End Input/Output List encountered without prior initialization. Result: Proceeds without 
taking any I/O action. 


EXP 




Exponential Function — Argument greater than 176. Result: Answer set to maximum floating- 
point value. 


FCHt 


X 


FORMAT Character Illegal — The illegal character is displayed as the fourth character (t) in 
the message typed out. Result: Begins scan for next specification; i.e., treats character as 
if it were a comma. 


FORL 


X 


FORMAT Label Error — The scalar variable referenced by an I/O statement has not been as- 
signed a FORMAT statement label. Result: The contents of the (effective address deter- 
mined by the variable) + 1 is used as the address of the start of the FORMAT statement. 


FORM 


X 


FORMAT Missing — I/O statement references something else. X = address of supposed FOR- 
MAT. A= first word of supposed FORMAT. Result: Scans supposed FORMAT. 


FORP 


X 


FORMAT Pointer Error — The address in the I/O list pointing to the FORMAT statement is not 
in an acceptable form; i. e. , HLT, BRU or AGT (1 12 or 1 13). X = address of pointer. A = 
bad pointer. Result: Pointer at address specified by X is treated as if it had form specified 
by a HLT. 


FXIO 


X 


Floating or Fixed Data requested for I/O without prior initialization. Result: Proceeds 
without taking any I/O action 


ICHt 


X 


Input Character Illegal — The illegal character is displayed as the fourth character (t) in the 
message typed out. Result: Begins scan for next field; i.e., treats character as if it were 
a comma. 



Figure 4. FORTRAN Run-time Errors 
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Message 


Halt 


Explanation 


IFSL 




If Sense Light — Value not 1-24. Result: Assume sense light off. 


IFSS 




If Sense Switch — Value not 1-4. Result: Assume sense switch off. 


INOV 




Integer Overflow -Input value of integer quantity exceeds 8,388,607. Result: Number 
truncated to the least significant 24 bits. 


LABL 


X 


Label Undefined —Result: Computer will not proceed. 


LCRD 


X 


Last Card Read in Error — May or may not be caused by a validity check. Place the last 
card back in the hopper. Result: Try to read the card again. 


LOG 




Logarithm Function —Argument negative or zero. Result: Answer set to zero. 


NO[ 


X 


No left parenthesis in FORMAT statement — Result: Computer will not proceed. 


N**F 




Negative Number Raised or Nonintegral Power. Result: Computes (|N|**F). 


OCTt 




Non-Octal Character (t) encountered during input under octal FORMAT specification. 
Result: Character is truncated to 3 least significant bits. 


PNCH 




Card Punch Not Ready — Program has waited 15 seconds for punch. Make the punch ready. 
Result: Continues to wait. Typeouts occur in 5-minute intervals. 


PRNT 




Printer Not Ready — Program has waited 15 seconds for printer. Make the printer ready. 
Result: Continues to wait. Typeouts occur in 5-minute intervals. 


PRTY 


X 


Parity Error During Input — Result: Processing continues using incorrect character. 


REP[ 




Repeat Count Precedes Outermost [ in FORMAT —Result: Where applicable, group repeat 
count is applied to entire FORMAT specification. 


REP$ 




Repeat Count Precedes $ in FORMAT —Result: Repeat count is ignored. 


SIZE 


X 


Size of Erasable Storage Exceeded — There is no unused memory in which to transfer argu- 
ments to subroutines. Result: Erasable storage will run into COMMON, if any, or out of 
memory. 


SNLT 




Sense Light — Value not 0-24. Result: Statement has no effect. 


SQRT 




Square Root Function —Argument negative. Result: Square root of absolute value of 
argument. 


XPOV 




Exponent Overflow on Input Datum — Result: List item set to positive maximum (approxi- 
mately .579 x 1077). 


XPUN 




Exponent Underflow on Input Datum —Result: List item set to zero. 


0**N 




Zero Raised to Nonpositive Power - Result: (0**0) will be 1 or 1.0, and (0**NEGATIVE) 
will be the maximum possible integer or floating number, as the case may be. 


[OVF 


X 


Nesting Level Exceeded — Limit on number of parenthesized groups of FORMAT specifications 
is normally 4 levels. Result: Higher levels of nesting are disregarded. 


TPNO 


X 


Logical Unit Number Not 0.7 — Logical unit number displayed in A. Result: Number will be 
truncated and the low-order octal digit (0-7) will be used. 



Figure 4. FORTRAN Run-time Errors (cont'd) 
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Message 


Halt 


Explanation 






For the remainder of the tape errors, the logical unit in error will be indicated as the 
fourth character (*) of the message typed out. 


BKS # 


X 


Backspace — Failed 10 Times. Result: Proceed as if backspace has successfully taken 
place. 


EOF# 


X 


End of File Reached During Reading — Result: Continue to read past end of file. 


ETR# 


X 


End of Tape While Reading —Remove the finished tape and replace with next reel. Result: 
Continue reading. 


ETW # 


X 


End of Tape While Writing — Remove the finished tape and replace with next reel. Result: 
Continue writing. This, in conjunction with ETR, facilitates writing and reading of mul- 
tiple reels. 


FPT# 


X 


File Protect — Attempted to write on tape which is file protected. Result: Check again. 


LRR # 


X 


Long Record Read —READ TAPE (binary) has read a logical record which contains more in- 
formation than is required by the I/O list. Result: The remainder of the record is skipped. 


RDT # 


X 


Read Tape Error — Failed to read 10 times. Result: Proceed assuming read to have been 
satisfactory. 


SRR # 


X 


Short Record Read —READ TAPE (binary) attempting to read more information from a logical 
record than is present. Result: Remaining items in the I/O list are supplied with words of 
zero. 


TNR# 




Tape Not Ready — Program has waited 3 minutes, 17 seconds for tape unit. Ready the tape 
unit. Result: Program continues to wait for tape unit. Typeouts occur in 3-minute, 17- 
second intervals. 


WEF# 


X 


Write End of File Error — Result: Try again. 


WRT # 


X 


Write Tape Error — Failed to write 5 times. Result: Proceed, assuming write to have been 
satisfactory. 


DNR# 


X 


Attempted to read a nonexistent record on XI or X2 disc file —Result: Return to MONARCH. 


DWC # 


X 


Invalid word count in second word of a disc file record — Result: Return to MONARCH. 


DTE# 


X 


Disc Transmission Error — (A) j = 1 implies read/write error. (A)3 = 1 implies an unsatisfied 
request to write due to lack of any further available disc storage. (A)e = 1 implies write 
operation was attempted into a file protected area. Result: If rewind or open operation, 
try again. If read or write operation, proceed, assuming operation to have been satisfactory. 



Figure 4. FORTRAN Run- time Errors 
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INDEX 



Action subroutines, 16 

ALGOL, 6,9 

ALGOL compiler, 1,9,17 
equipment configuration, 2 
source deck structure, 34 

ALGOL loader, 11 

ALGOLOAD, 6,11 

ASSIGN, 5,16,42 



Control messages (cont. ) 

SET, 6,12 

SHOW (see DISPLAY) 

SKIPFILE, 6,13,14 

SKIPREC, 6,13,14 

SYMBOL, 6,7 

UPDATE, 6,15 

WEOF, 6,14 
COPY, 23-29 



B 

BACKFILE, 6,13,14 

BACKREC, 6,13,14 

Batch processing, 1, 35 

Blank COMMON references and definition, 17 

Blocking mode, 24 

BOOTLOAD, 6, 14 

Bootstrap, 1,9, 14, 16, 17 

Bootstrap loader, 1, 16, 17 

Business Language Assignment Table (BAT), 6,40,41,42 



C, 4,6,11,36 

Card read/punch subroutine, 16 

CARDTAPE, 6,15 

CDRP, 15 

Character Set, 69 

COMMON relocation, 49 

Control messages, 4, 5 

ALGOL, 6,9 

ALGOLOAD, 6,11 

ASSIGN, 6,16,42 

BACKFILE, 6,13,14 

BACKREC, 6, 14 

BOOTLOAD, 6,14,15 

C, 4,6,11,36 

CARDTAPE, 6,15 

DISPLAY, 6,12 

ENDJOB,6 

EOF, 6,14,15 

FILLSYS, 5,9 

FORTLINK, 6,11,55,56,57,58 

FORTLOAD, 6,10,11 

FORTRAN, 6,8 

JOB, 6 

LABEL, 6,12 

LOAD, 6,9,10 

METAXXXX, 6,7 

ONLINE, (see ASSIGN) 

POSITION, 6,13 

REWIND, 6, 13 

RTFTLOAD, 6, 1 1 

RTFTRAN, 6,8 



Data records, 1 8, 48, 49, 60 
Decimal integer, 5 
Diagnostics, 66 

FORTRAN II, 68 

META-SYMBOL, 66,67 

MONARCH, 38 

SYMBOL, 67,68 
DISPLAY, 6,12 



E 



ENDJOB, 6 

End-of-file (EOF) mark, 13, 15, 56, 57 

End record, 64, 65 

EOF, 6,13,15 

Equipment configuration, 1, 2 

Error switch, 6, 10, 16,40 (see JOB, ENDJOB) 

External label references/definitions, 17,18,19,20,50, 

51,60,62 
External POP references/definitions, 17, 18, 19,20,49, 

51,52,53,60,62,63,64 

F 

FILLSYS, 5,9 

Format of control messages, 4 

FORTLINK, 6, 11, 55, 56, 57, 58 

FORTLOAD, 6, 10, 11 

FORTRAN, 6,8 

FORTRAN II compiler, 1,9,17 

equipment configuration, 2 

linking, 9,55-59 

source deck-structure, 31 
FORTRAN loader, 9,38,39 
Functions of MONARCH, 2 
Furnishing control messages, 36 

H 

Halts (MONARCH program), 38 



I 



Input control messages, 9, 10, 1 1 
ALGOLOAD, 6,11 
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Input control messages (cont.) 

FILLSYS, 5,9 

FORTH NK, 6,11,56,57,58 

FORTLOAD, 6, 10, 11 

LOAD, 6,9,10 
I/O device specification, 5 
I/O subrouti nes (standard), 1 6, 1 7, 40, 41 , 42 



J 



JOB, 6 

Job mode, 6 

Job switch, 1, 10, 16,40 



L 



LABEL, 6,12,13 

Level 1/2 ID records, 10, 12, 1 3, 23, 24, 25, 26, 27, 28 

Library (MONARCH), 17 

Loading from, 18, 19,20 
Line printer output subroutine, 16, 18 
Linking (FORTRAN), 9,55 
Linking process (FORTRAN), 55, 56 
Literal parameters, 5 
LOAD, 6,9,10 
Loader, 1,9,16,17,21,22,23 
Loading the MONARCH system, 36,43,48 
Load relocation, 49 

M 

Magnetic tape I/O subroutine, 16 

Memory allocation, 17,18,44 

Memory dump routine (see Octal Dump Routine) 

META-SYMBOL assembler, 1,2, 7, 17 

equipment configuration, 2 

error messages, 66 

source deck structure, 31 

updating of, 54 
METAXXXX, 6,7 
MONARCH 

bootstrap, 1, 8, 9, 1 4, 1 6, 1 7, 1 8, 45 

ID records 10, 12, 1 3, 23, 24, 25, 26, 27, 28, 42, 43, 44 

library, 17,18,19,20 

loader, 1,9,10,16,17,18,20,48 

system, 1 6, 43, 44 
Monitor, 1, 2, 3, 16, 17 
MTAPE, 16,48 

N 

Numeric parameters, 4 



Octal correction routine, 21,22 

Octal dump routine, 16,21 

Octal integer, 4 

ONLINE, 6 

Operating environment, 1 

Operating procedures, 36 



Paper tape/typewriter I/O subroutine, 16 
Parameters of control messages, 3 

literal, 5 

numeric, 4 

symbolic, 5 
POP relocation, 49 
POSITION, 6,13 
Preparing program decks, 30 

ALGOL, 34 

batch processing, 35 

FORTRAN II, 31 

META-SYMBOL, 30 
PRINT, 16 
Program, 18 
Processor control messages, 6, 7 

ALGOL, 6,9 

FORTRAN, 6,8 

METAXXXX, 6,7 

SYMBOL, 6,8 
Processor error switch (see Error Switch) 
PTYIO, 16,48 



QBINI, 18,41 
QBINO, 41 
QBOOT, 17 
QDUMP, 16,21 
QMSG, 18,23,41 
QPESW, 40 
QSYLDR, 22 
QSYMO, 24,41 
QSYS, 24,41 
QSYSI, 41 
QSYSP, 41 
QSYST, 23,41 
QSYSU, 23,41 



Recovery procedure, 38 

Relocation and data records, 19,49,50 

Resident, 1, 16, 17 

Restart procedure, 17 

REWIND, 6,13 



Search subroutine, 13,16 

Separators, 4 

SET, 6,12 

SHOW, 6,12 

SKIPFILE, 6,13 

SKIPREC, 6,13 

Special I/O relocation, 50 

Standard binary language, 17,60 

Standard system routines, 16 

Storage allocation, 18,44 
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SYMBOL, 6,8 

SYMBOL assembler, 1, 8, 17 

equipment configuration, 1 

error messages, 67, 68 
Symbolic parameters, 5 
Symbol table, 8,17,38,52 
Symbol table typeout routine, 15, 18, 19,20 
Syntax of control messages, 4 
System control messages 6 

ASSIGN, 6,16,42 

ENDJOB, 6 

JOB, 6 

ONLINE, 6 

SYSEND, 12,28,29,43,48 
System maintenance messages 

UPDATE, 6,15 
System output, 38 



Tape search routine, 13, 16 
Termination of a run, 17 
TYPSY5, 21 



Update routine (cont. ) 

deletion, 25 

insertion, 24, 25 

replacement, 25 

retention, 25 

UPDATE, 6, 14 

update file, 23,24 

updating META-SYMBOL, 54 
Utility functions messages, 6 

BACKFILE, 6, 14 

BACKREC, 6, 14 

BOOTLOAD, 6, 14 

C, 4,6,7,11,36 

CARDTAPE, 6,15 

DISPLAY, 6,12 

EOF, 6,14 

LABEL, 6 

POSITION, 6,13 

REWIND, 6,13 

SET, 6, 12 

SHOW, 6,12 

SKIPFILE, 6,13 

SKIPREC, 6,13 

WEOF, 6,14 



u 



Unit assignment table ^UAT^, 1, 1 

UPDATE, 6,15 

Update routine, 1,15,16,23 
blocking/normal mode, 24 
COPY message, 24, 25, 26, 27 
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WEOF, 6,14 
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